01/01: installer: Fix F1 key.

[Danny Milosavljevic]

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

commit fe43d62634496227d400a386fde39ffc540da442
Author: Danny Milosavljevic <address@hidden>
Date:   Wed Jul 5 17:08:45 2017 +0200

    installer: Fix F1 key.
    
    * gnu/system/installer/page.scm (page-default-key-handler): Modify.
---
 gnu/system/installer/page.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/system/installer/page.scm b/gnu/system/installer/page.scm
index d100f3a..63955ee 100644
--- a/gnu/system/installer/page.scm
+++ b/gnu/system/installer/page.scm
@@ -158,7 +158,8 @@ If a form is used it's assumed that the menu is not used 
and vice versa."
           (form-set-enabled! form #t)))
       'handled)
 
-     ((and nav (or (buttons-fetch-by-key nav (char-upcase ch))
+     ((and nav (char? ch)
+               (or (buttons-fetch-by-key nav (char-upcase ch))
                    (buttons-fetch-by-key nav (char-downcase ch))))
       (buttons-select-by-symbol nav (or (buttons-fetch-by-key nav
                                                               (char-upcase ch))