aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-02-11 11:11:01 +0100
committerLudovic Courtès <ludo@gnu.org>2015-02-11 11:11:01 +0100
commitfbe952c99f5ab8d6001984d4b74469e48178d4c7 (patch)
treefddfa0f501344d722be6ab08ecef1279e1c12080
parentab3872de4f2c7f97895a570d228c42d7b03bed37 (diff)
downloadguix-fbe952c99f5ab8d6001984d4b74469e48178d4c7.tar
guix-fbe952c99f5ab8d6001984d4b74469e48178d4c7.tar.gz
derivations: Make the "grafting..." message directly visible.
* guix/derivations.scm (graft-derivation)[build]: Add call to 'force-output'.
-rw-r--r--guix/derivations.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/derivations.scm b/guix/derivations.scm
index 2cbf46f465..678550a39e 100644
--- a/guix/derivations.scm
+++ b/guix/derivations.scm
@@ -1095,6 +1095,7 @@ applied."
(let ((mapping ',mapping))
(for-each (lambda (input output)
(format #t "grafting '~a' -> '~a'...~%" input output)
+ (force-output)
(rewrite-directory input output
`((,input . ,output)
,@mapping)))