summaryrefslogtreecommitdiff
path: root/Remotes.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-25 20:48:32 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-25 20:48:32 -0400
commit99eaf41da57819ed49e554b09a61b74ac91c7ddb (patch)
tree4b2f619eed4ef4091d5dd5e1a61493ede0c0e79c /Remotes.hs
parent0788c12ffe9c07104ca70f4dc0636ed0f6879ad2 (diff)
better messages
Diffstat (limited to 'Remotes.hs')
-rw-r--r--Remotes.hs2
1 files changed, 0 insertions, 2 deletions
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)