summary refs log tree commit diff
path: root/build-aux
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-01-06 18:16:19 +0100
committerLudovic Courtès <ludo@gnu.org>2019-01-06 21:41:07 +0100
commitafb82831fa4d8602859eb00056dd3f418ed363c9 (patch)
tree54eb93c8f687777641b84e089d62ccb780ebc752 /build-aux
parent0f763db448758c8b7b9ae91d6870f75fc0ff987b (diff)
downloadguix-afb82831fa4d8602859eb00056dd3f418ed363c9.tar.gz
build-self: Don't clobber the output port.
The newline is meant to follow the spinner's traces so it must go to the
error port as well.

* build-aux/build-self.scm (build): Send newline to the error port.
Diffstat (limited to 'build-aux')
-rw-r--r--build-aux/build-self.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/build-aux/build-self.scm b/build-aux/build-self.scm
index 5b281c3bc9..c1a253dc87 100644
--- a/build-aux/build-self.scm
+++ b/build-aux/build-self.scm
@@ -420,7 +420,7 @@ files."
            (error "build program failed" (list build status)))
           ((? derivation-path? drv)
            (mbegin %store-monad
-             (return (newline (current-output-port)))
+             (return (newline (current-error-port)))
              ((store-lift add-temp-root) drv)
              (return (read-derivation-from-file drv))))
           ("#f"