03/03: installer: gurses: Report status on form-enter.

[Danny Milosavljevic]

dannym pushed a commit to branch wip-installer-2
in repository guix.

commit deeb2cebf95519157a011cc276ea9d9c1a51e1c3
Author: Danny Milosavljevic <address@hidden>
Date:   Tue Jul 4 22:49:41 2017 +0200

    installer: gurses: Report status on form-enter.
    
    * gurses/form.scm (form-enter): Modify.
---
 gurses/form.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gurses/form.scm b/gurses/form.scm
index 4dbe917..b952483 100644
--- a/gurses/form.scm
+++ b/gurses/form.scm
@@ -237,7 +237,9 @@ label eq? to N"
         (when (form-callback form)
               ((form-callback form) form))
 
-       (refresh (form-window form)))))
+       (refresh (form-window form))
+        'handled)
+      'ignored))
 
 (define (ensure-panel! win)
   (if (not (panel? win))