me
/
guix
Archived
1
0
Fork 0

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.
master
Ludovic Courtès 2019-01-06 18:16:19 +01:00
parent 0f763db448
commit afb82831fa
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions

View File

@ -420,7 +420,7 @@ files."
(error "build program failed" (list build status))) (error "build program failed" (list build status)))
((? derivation-path? drv) ((? derivation-path? drv)
(mbegin %store-monad (mbegin %store-monad
(return (newline (current-output-port))) (return (newline (current-error-port)))
((store-lift add-temp-root) drv) ((store-lift add-temp-root) drv)
(return (read-derivation-from-file drv)))) (return (read-derivation-from-file drv))))
("#f" ("#f"