summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-25 20:52:03 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-25 20:52:03 -0400
commit5d4ff035ba0f5a9bd9c61def3effd68bfeb02448 (patch)
treea6801946478011fa36d0113dc77e57ed618e976e
parent99eaf41da57819ed49e554b09a61b74ac91c7ddb (diff)
bugfix
-rw-r--r--Commands.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Commands.hs b/Commands.hs
index 2941d619e..da4d840ae 100644
--- a/Commands.hs
+++ b/Commands.hs
@@ -436,7 +436,7 @@ moveToPerform file key = do
showNote $ show err
return Nothing
Right False -> do
- Core.showNote $ "moving to " ++ (Git.repoDescribe r) ++ "..."
+ Core.showNote $ "moving to " ++ (Git.repoDescribe remote) ++ "..."
let tmpfile = (annexTmpLocation remote) ++ (keyFile key)
ok <- Remotes.copyToRemote remote key tmpfile
if (ok)
@@ -479,7 +479,7 @@ moveFromPerform file key = do
if (ishere)
then return $ Just $ moveFromCleanup remote key
else do
- Core.showNote $ "moving from " ++ (Git.repoDescribe r) ++ "..."
+ Core.showNote $ "moving from " ++ (Git.repoDescribe remote) ++ "..."
ok <- getViaTmp key (Remotes.copyFromRemote remote key)
if (ok)
then return $ Just $ moveFromCleanup remote key