14/20: installer: Fix ethernet connection.

[guix-commits]

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

commit 8d4183da93c993c0f34cfbd19655e64805e08c3a
Author: Mathieu Othacehe <address@hidden>
Date:   Wed Dec 5 14:52:04 2018 +0900

    installer: Fix ethernet connection.
    
    * gnu/installer/newt/ethernet.scm (connect-ethernet-service): Return the
    service passed as parameter.
---
 gnu/installer/newt/ethernet.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/installer/newt/ethernet.scm b/gnu/installer/newt/ethernet.scm
index 2cbbfdd..2b02653 100644
--- a/gnu/installer/newt/ethernet.scm
+++ b/gnu/installer/newt/ethernet.scm
@@ -54,7 +54,8 @@ connection is pending."
   (let* ((service-name (service-name service))
          (form (draw-connecting-page service-name)))
     (connman-connect service)
-    (destroy-form-and-pop form)))
+    (destroy-form-and-pop form)
+    service))
 
 (define (run-ethernet-page)
   (let ((services (ethernet-services)))