[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: installer: Make gurses menu active when the user clicks into it.
From: |
Danny Milosavljevic |
Subject: |
01/01: installer: Make gurses menu active when the user clicks into it. |
Date: |
Tue, 4 Jul 2017 17:32:37 -0400 (EDT) |
dannym pushed a commit to branch wip-installer-2
in repository guix.
commit c11328e00637b448e6ebd55d920884bae5707acd
Author: Danny Milosavljevic <address@hidden>
Date: Tue Jul 4 23:31:47 2017 +0200
installer: Make gurses menu active when the user clicks into it.
* gurses/menu.scm (std-menu-mouse-handler): Modify.
---
gurses/menu.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gurses/menu.scm b/gurses/menu.scm
index a6fe6f9..42418bf 100644
--- a/gurses/menu.scm
+++ b/gurses/menu.scm
@@ -196,7 +196,7 @@ active."
(item-count (length (menu-items menu))))
(match (mouse-trafo win g-y g-x #f)
((y x)
- (menu-set-active! menu #f)
+ (menu-set-active! menu #t)
(let ((selected-item-index (+ y top-item-index)))
(if (and (>= selected-item-index 0) (< selected-item-index
item-count))
(begin