diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-03-15 22:53:14 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-03-15 22:53:14 -0400 |
| commit | 49b7f5918341c30140779ea1f376b4d9f81d8a30 (patch) | |
| tree | 454772293be974bb79bf8c7f42aea9740d0bca77 /Command/Move.hs | |
| parent | 9d24cc7bdb011d66e41229a3b96401808be47268 (diff) | |
test suite passes again
doesn't test remote functionality.. but that may be working too now
Diffstat (limited to 'Command/Move.hs')
| -rw-r--r-- | Command/Move.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/Command/Move.hs b/Command/Move.hs index 1b1481308..2d6c973fe 100644 --- a/Command/Move.hs +++ b/Command/Move.hs @@ -20,7 +20,6 @@ import qualified Remotes import UUID import Messages import Utility -import Key command :: [Command] command = [Command "move" paramPath seek @@ -137,8 +136,7 @@ fromCleanup :: Git.Repo -> Bool -> Key -> CommandCleanup fromCleanup src True key = do ok <- Remotes.onRemote src (boolSystem, False) "dropkey" [ Params "--quiet --force" - , Param $ "--backend=" ++ keyBackendName key - , Param $ keyName key + , Param $ show key ] -- better safe than sorry: assume the src dropped the key -- even if it seemed to fail; the failure could have occurred |