From 7c0777c60d5381cc16342483747e1fc9c92e41e0 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Fri, 29 Oct 2010 14:10:55 -0400
Subject: avoid unnessary newlines before progress in quiet mode

---
 Backend/URL.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Backend/URL.hs')

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 
-- 
cgit v1.2.3