[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
52/80: installer: Fix bug where window-pipe did not return the proper ex
From: |
John Darrington |
Subject: |
52/80: installer: Fix bug where window-pipe did not return the proper exit status. |
Date: |
Tue, 3 Jan 2017 15:49:44 +0000 (UTC) |
jmd pushed a commit to branch wip-installer
in repository guix.
commit 375828e31255f4d151da53d719f7f99687c7baaa
Author: John Darrington <address@hidden>
Date: Wed Dec 28 12:14:50 2016 +0100
installer: Fix bug where window-pipe did not return the proper exit status.
* gnu/system/installer/utils.scm (window-pipe): Return exit status of cmd.
---
gnu/system/installer/utils.scm | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/gnu/system/installer/utils.scm b/gnu/system/installer/utils.scm
index b8e257d..8623169 100644
--- a/gnu/system/installer/utils.scm
+++ b/gnu/system/installer/utils.scm
@@ -69,10 +69,11 @@
(define* (window-pipe win cmd #:rest args)
"Run CMD ARGS ... sending stdout and stderr to WIN. Returns the exit status
of CMD."
- (let* ((windowp (make-window-port win)))
- (clear win)
- (apply pipe-cmd windowp cmd args)
- (close-port windowp)))
+ (clear win)
+ (let* ((windowp (make-window-port win))
+ (result (apply pipe-cmd windowp cmd args)))
+ (close-port windowp)
+ result))
(define* (pipe-cmd ipipe cmd #:rest args)
"Run CMD ARGS ... sending stdout and stderr to IPIPE. Returns the exit
status of CMD."
- 32/80: installer: Add a task to actually call guix system init., (continued)
- 32/80: installer: Add a task to actually call guix system init., John Darrington, 2017/01/03
- 38/80: installer: Replace some instances of "car"., John Darrington, 2017/01/03
- 26/80: installer: Add a new menu to configure wireless interfaces., John Darrington, 2017/01/03
- 59/80: installer: Prevent the user specifying the same mount point twice., John Darrington, 2017/01/03
- 57/80: installer: Issue message to user on failure of filesystems task., John Darrington, 2017/01/03
- 64/80: installer: Add a console-keymap service., John Darrington, 2017/01/03
- 71/80: installer: Make setting up of the network a prerequisite., John Darrington, 2017/01/03
- 55/80: installer: Close unused ports in pipe-cmd., John Darrington, 2017/01/03
- 72/80: installer: Ensure that all mount points are absolute paths., John Darrington, 2017/01/03
- 70/80: installer: Change essid --> wireless., John Darrington, 2017/01/03
- 52/80: installer: Fix bug where window-pipe did not return the proper exit status.,
John Darrington <=
- 78/80: installer: Rename "file-browser" -> "time-zone"., John Darrington, 2017/01/03
- 75/80: installer: Add predicate for the network task., John Darrington, 2017/01/03
- 50/80: installer: Rename module "new" to "guixsd-installer"., John Darrington, 2017/01/03
- 54/80: installer: Improve install page., John Darrington, 2017/01/03
- 62/80: installer: Use global variable instead of string literal for "/gnu"., John Darrington, 2017/01/03
- 63/80: installer: Do not use /tmp for holding the configuration., John Darrington, 2017/01/03
- 56/80: installer: Replace spawned mount command with the mount syscall., John Darrington, 2017/01/03
- 53/80: installer: Replace "%temporary-configuration-file-port" with "config-file"., John Darrington, 2017/01/03
- 51/80: installer: Use consistent window heights., John Darrington, 2017/01/03
- 15/80: installer: Add procedures to replace car/cdr since these are frounded upon by Guile gurus., John Darrington, 2017/01/03