[commit: ghc] wip/nfs-locking: Don't print progress info too early. (e5e7221)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/e5e722178f227e3b81d27c8f66c152002d375aad/ghc

>---------------------------------------------------------------

commit e5e722178f227e3b81d27c8f66c152002d375aad
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Tue Feb 2 15:11:53 2016 +0000

    Don't print progress info too early.
    
    See #200.


>---------------------------------------------------------------

e5e722178f227e3b81d27c8f66c152002d375aad
 src/Rules/Actions.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Rules/Actions.hs b/src/Rules/Actions.hs
index d85e0dc..658ba17 100644
--- a/src/Rules/Actions.hs
+++ b/src/Rules/Actions.hs
@@ -67,6 +67,7 @@ captureStdout target path argList = do
 
 copyFile :: FilePath -> FilePath -> Action ()
 copyFile source target = do
+    need [source] -- Guarantee source is built before printing progress info.
     putProgressInfo $ renderAction "Copy file" source target
     copyFileChanged source target