diff options
author | Joey Hess <joey@kitenet.net> | 2010-11-15 18:37:49 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-11-15 18:37:49 -0400 |
commit | 0893820812c9cc10287c861dccbdae3c287cd7cf (patch) | |
tree | 3d3216d68f805d84ce423244273fee8f4e8353a3 /Messages.hs | |
parent | a5e7f5329f4d9a80a34302e3707f0bd42b91a441 (diff) |
fsck: Print warnings to stderr; --quiet can now be used to only see problems.
Diffstat (limited to 'Messages.hs')
-rw-r--r-- | Messages.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Messages.hs b/Messages.hs index ed4f3b90a..7dafa8284 100644 --- a/Messages.hs +++ b/Messages.hs @@ -54,4 +54,6 @@ showErr :: (Show a) => a -> Annex () showErr e = warning $ show e warning :: String -> Annex () -warning s = liftIO $ hPutStrLn stderr $ "git-annex: " ++ s +warning s = do + verbose $ liftIO $ putStr "\n" + liftIO $ hPutStrLn stderr $ "git-annex: " ++ s |