[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: installer: Ignore unknown events on the ping page.
From: |
Danny Milosavljevic |
Subject: |
01/01: installer: Ignore unknown events on the ping page. |
Date: |
Fri, 7 Jul 2017 16:18:58 -0400 (EDT) |
dannym pushed a commit to branch wip-installer-2
in repository guix.
commit dbcb67244a4e814c10a8d9b77d14ab4ad877fcd3
Author: Danny Milosavljevic <address@hidden>
Date: Fri Jul 7 22:17:51 2017 +0200
installer: Ignore unknown events on the ping page.
* gnu/system/installer/ping.scm (ping-page-activate-item): Ignore unknown
events.
---
gnu/system/installer/ping.scm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/gnu/system/installer/ping.scm b/gnu/system/installer/ping.scm
index 56f1fb1..ab78520 100644
--- a/gnu/system/installer/ping.scm
+++ b/gnu/system/installer/ping.scm
@@ -74,7 +74,9 @@
(addstr test-window (G_ "Test successful. Network is working."))
(addstr test-window (G_ "Test failed. No servers reached.")))
(refresh* test-window)
- 'handled)))))
+ 'handled))
+ (_
+ 'ignored))))
(define (ping-page-refresh page)
(when (not (page-initialised? page))