diff options
author | Joey Hess <joey@kitenet.net> | 2010-10-29 14:10:55 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-10-29 14:10:55 -0400 |
commit | 7c0777c60d5381cc16342483747e1fc9c92e41e0 (patch) | |
tree | 92d30d2d4c5b0eca89855aab13dac74f8fcf8fc0 /Core.hs | |
parent | d92f186fc4bc34e0999a6e47f15e54717e0ab206 (diff) |
avoid unnessary newlines before progress in quiet mode
Diffstat (limited to 'Core.hs')
-rw-r--r-- | Core.hs | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -154,6 +154,8 @@ showNote :: String -> Annex () showNote s = verbose $ do liftIO $ putStr $ "(" ++ s ++ ") " liftIO $ hFlush stdout +showProgress :: Annex () +showProgress = verbose $ liftIO $ putStr $ "\n" showLongNote :: String -> Annex () showLongNote s = verbose $ do liftIO $ putStr $ "\n" ++ (indent s) |