From 5f742c84d4d908bee8bf88b5c30a9e8ffe5cac0c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 9 Dec 2014 11:24:56 +0100
Subject: [PATCH] substitute-binary: Add missing newline in download progress
report.
Fixes <http://bugs.gnu.org/19313>.
Reported by rekado <rekado@elephly.net>.
* guix/scripts/substitute-binary.scm (guix-substitute-binary)
<--substitute>: Add 'newline' call.
---
guix/scripts/substitute-binary.scm | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/guix/scripts/substitute-binary.scm b/guix/scripts/substitute-binary.scm
index 0801057e39e..9c964116301 100755
--- a/guix/scripts/substitute-binary.scm
+++ b/guix/scripts/substitute-binary.scm
@@ -758,6 +758,10 @@ (define (valid? obj)
progress)))
;; Unpack the Nar at INPUT into DESTINATION.
(restore-file input destination)
+
+ ;; Skip a line after what 'progress-proc' printed.
+ (newline (current-error-port))
+
(every (compose zero? cdr waitpid) pids))))
(("--version")
(show-version-and-exit "guix substitute-binary"))
--
GitLab