06/07: installer: Return to network page after passphrase entry.

[John Darrington]

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

commit 07f1f9f61896e786109bdaa7eaa71821ec8ac91a
Author: John Darrington <address@hidden>
Date:   Sun Feb 19 15:15:22 2017 +0100

    installer: Return to network page after passphrase entry.
    
    * gnu/system/installer/passphrase.scm (passphrase--key-handler): Pop one
    level before returning.
---
 gnu/system/installer/passphrase.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/gnu/system/installer/passphrase.scm 
b/gnu/system/installer/passphrase.scm
index 22eb13d..b222e90 100644
--- a/gnu/system/installer/passphrase.scm
+++ b/gnu/system/installer/passphrase.scm
@@ -21,6 +21,7 @@
   #:use-module (gnu system installer misc)
   #:use-module (gnu system installer utils)
   #:use-module (gnu system installer wireless)
+  #:use-module (gnu system installer levelled-stack)
   #:use-module (gurses form)
   #:use-module (gurses buttons)
   #:use-module (ncurses curses)
@@ -92,6 +93,7 @@
        (page-datum page 'ifce)
        access-point
        (form-get-value form 'passphrase))
+      (page-pop)
       (page-leave))
 
      (else