aboutsummaryrefslogtreecommitdiff
path: root/Backend/URL.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-29 14:10:55 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-29 14:10:55 -0400
commit7c0777c60d5381cc16342483747e1fc9c92e41e0 (patch)
tree92d30d2d4c5b0eca89855aab13dac74f8fcf8fc0 /Backend/URL.hs
parentd92f186fc4bc34e0999a6e47f15e54717e0ab206 (diff)
avoid unnessary newlines before progress in quiet mode
Diffstat (limited to 'Backend/URL.hs')
-rw-r--r--Backend/URL.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Backend/URL.hs b/Backend/URL.hs
index 7f0bd6673..384f933eb 100644
--- a/Backend/URL.hs
+++ b/Backend/URL.hs
@@ -41,7 +41,7 @@ dummyOk url = return True
downloadUrl :: Key -> FilePath -> Annex Bool
downloadUrl key file = do
showNote "downloading"
- liftIO $ putStrLn "" -- make way for curl progress bar
+ showProgress -- make way for curl progress bar
liftIO $ boolSystem "curl" ["-#", "-o", file, url]
where
url = join ":" $ drop 1 $ split ":" $ show key