fsck: Print warnings to stderr; --quiet can now be used to only see problems.

This commit is contained in:
Joey Hess 2010-11-15 18:37:49 -04:00
parent a5e7f5329f
commit 0893820812
7 changed files with 16 additions and 14 deletions

View file

@ -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