aboutsummaryrefslogtreecommitdiff
path: root/gnu/installer
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2018-12-05 14:52:04 +0900
committerLudovic Courtès <ludo@gnu.org>2019-01-17 14:04:23 +0100
commitfb1675cbca68a7ada710640294a26cf0f1b22168 (patch)
treedece4c140f27de96432c9c3ab29047751668574f /gnu/installer
parent6aa625c2f82332f8987247958fc18955bd8078f3 (diff)
downloadpatches-fb1675cbca68a7ada710640294a26cf0f1b22168.tar
patches-fb1675cbca68a7ada710640294a26cf0f1b22168.tar.gz
installer: Fix ethernet connection.
* gnu/installer/newt/ethernet.scm (connect-ethernet-service): Return the service passed as parameter.
Diffstat (limited to 'gnu/installer')
-rw-r--r--gnu/installer/newt/ethernet.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/installer/newt/ethernet.scm b/gnu/installer/newt/ethernet.scm
index 2cbbfddacd..2b02653777 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)))