better message display

This commit is contained in:
Joey Hess 2010-10-23 13:59:47 -04:00
parent 9dfbf40d1a
commit 03bcb8d8b3

View file

@ -97,7 +97,7 @@ logStatus key status = do
{- Output logging -}
showStart :: String -> String -> Annex ()
showStart command file = do
liftIO $ putStr $ command ++ " " ++ file
liftIO $ putStr $ command ++ " " ++ file ++ " "
liftIO $ hFlush stdout
showNote :: String -> Annex ()
showNote s = do