From 99eaf41da57819ed49e554b09a61b74ac91c7ddb Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 25 Oct 2010 20:48:32 -0400
Subject: better messages

---
 Remotes.hs | 2 --
 1 file changed, 2 deletions(-)

(limited to 'Remotes.hs')

diff --git a/Remotes.hs b/Remotes.hs
index 1d5992704..81a4af47a 100644
--- a/Remotes.hs
+++ b/Remotes.hs
@@ -188,7 +188,6 @@ tryGitConfigRead r = do
 {- Tries to copy a key's content from a remote to a file. -}
 copyFromRemote :: Git.Repo -> Key -> FilePath -> Annex Bool
 copyFromRemote r key file = do
-	Core.showNote $ "copying from " ++ (Git.repoDescribe r) ++ "..."
 	if (not $ Git.repoIsUrl r)
 		then getlocal
 		else if (Git.repoIsSsh r)
@@ -206,7 +205,6 @@ copyToRemote :: Git.Repo -> Key -> FilePath -> Annex Bool
 copyToRemote r key file = do
 	g <- Annex.gitRepo
 	let keyloc = annexLocation g key
-	Core.showNote $ "copying to " ++ (Git.repoDescribe r) ++ "..."
 	if (not $ Git.repoIsUrl r)
 		then putlocal keyloc
 		else if (Git.repoIsSsh r)
-- 
cgit v1.2.3