[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: installer: Also allow space bar to confirm popup menu selection.
From: |
Danny Milosavljevic |
Subject: |
01/01: installer: Also allow space bar to confirm popup menu selection. |
Date: |
Fri, 7 Jul 2017 10:00:02 -0400 (EDT) |
dannym pushed a commit to branch wip-installer-2
in repository guix.
commit d147b641e2c5a939ac26cb55fb924b2a786ef735
Author: Danny Milosavljevic <address@hidden>
Date: Fri Jul 7 15:58:52 2017 +0200
installer: Also allow space bar to confirm popup menu selection.
* gurses/form.scm (maybe-run-modal-popup): Modify.
---
gurses/form.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/gurses/form.scm b/gurses/form.scm
index de8b950..9d97dac 100644
--- a/gurses/form.scm
+++ b/gurses/form.scm
@@ -296,7 +296,8 @@ Set the field value to the newly selected value."
(let ((ch (run-event-loop form menu
(lambda (form ch)
(if (or (eqv? ch #\newline)
- (eqv? ch #\tab))
+ (eqv? ch #\tab)
+ (eqv? ch #\space))
ch
#f)))))
(field-set-value! new-field (menu-get-current-item menu))