02/03: derivations: Make the "grafting..." message directly visible.

[Ludovic Court�s]

civodul pushed a commit to branch master
in repository guix.

commit fbe952c99f5ab8d6001984d4b74469e48178d4c7
Author: Ludovic Courtès <address@hidden>
Date:   Wed Feb 11 11:11:01 2015 +0100

    derivations: Make the "grafting..." message directly visible.
    
    * guix/derivations.scm (graft-derivation)[build]: Add call to
      'force-output'.
---
 guix/derivations.scm |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/guix/derivations.scm b/guix/derivations.scm
index 2cbf46f..678550a 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)))