04/06: installer: Ignore strange mouse events.

[Danny Milosavljevic]

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

commit a3ec4895514666cc5e76f89cc3d3db7075b886e4
Author: Danny Milosavljevic <address@hidden>
Date:   Tue Jul 4 18:47:36 2017 +0200

    installer: Ignore strange mouse events.
    
    * gnu/system/installer/guixsd-installer.scm (guixsd-installer): Ignore 
strange
    mouse events.
---
 gnu/system/installer/guixsd-installer.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/system/installer/guixsd-installer.scm 
b/gnu/system/installer/guixsd-installer.scm
index a8503b0..54a65af 100644
--- a/gnu/system/installer/guixsd-installer.scm
+++ b/gnu/system/installer/guixsd-installer.scm
@@ -337,7 +337,7 @@
                  ;  ((y x) ...)
                  ;  (#f ...))
                  ((page-mouse-handler current-page) current-page device-id x y 
z button-state))
-                (_ ((base-page-key-handler current-page) current-page 
KEY_DOWN)))
+                (_ #f))
               (let* ((current-page (page-top))
                         (ret ((page-key-handler current-page) current-page 
ch)))
                    (when (eq? ret 'cancelled)