diff options
author | Joey Hess <joey@kitenet.net> | 2010-10-25 20:48:32 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-10-25 20:48:32 -0400 |
commit | 99eaf41da57819ed49e554b09a61b74ac91c7ddb (patch) | |
tree | 4b2f619eed4ef4091d5dd5e1a61493ede0c0e79c /Remotes.hs | |
parent | 0788c12ffe9c07104ca70f4dc0636ed0f6879ad2 (diff) |
better messages
Diffstat (limited to 'Remotes.hs')
-rw-r--r-- | Remotes.hs | 2 |
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) |