summaryrefslogtreecommitdiff
path: root/src/Propellor/DotDir.hs
diff options
context:
space:
mode:
authorJoey Hess2018-01-02 12:34:58 -0400
committerJoey Hess2018-01-02 12:34:58 -0400
commitdf67ff0ad827c6d2db63e79f342106022716bd90 (patch)
treea4e71ff1f7e9e61595c781cf83dba23ee9cf19f5 /src/Propellor/DotDir.hs
parent82a411be9b63df5bf8efda668561c77e50e3cb40 (diff)
avoid mixing concurrent and non-concurrent output for related messages
If the concurrent output was delayed for whatever reason, the messages could appear out of order and separated from one-another.
Diffstat (limited to 'src/Propellor/DotDir.hs')
-rw-r--r--src/Propellor/DotDir.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/DotDir.hs b/src/Propellor/DotDir.hs
index f42c0575..e9253b87 100644
--- a/src/Propellor/DotDir.hs
+++ b/src/Propellor/DotDir.hs
@@ -427,7 +427,7 @@ setupUpstreamMaster newref = do
warnoutofdate :: Bool -> IO ()
warnoutofdate havebranch = do
warningMessage ("** Your ~/.propellor/ is out of date..")
- let also s = hPutStrLn stderr (" " ++ s)
+ let also s = infoMessage [" " ++ s]
also ("A newer upstream version is available in " ++ distrepo)
if havebranch
then also ("To merge it, run: git merge " ++ upstreambranch)