diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-12-31 15:52:59 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-12-31 15:52:59 -0400 |
| commit | 30e0065ab97843f866a7fe095b8a18ee6eb4c321 (patch) | |
| tree | 25ad127c79f96dbde8652b6cd8cfb39fba1944bc /Command/Move.hs | |
| parent | eac433a84ad397e371300343b7cd30b7741ee023 (diff) | |
tuple makes it clearer
Diffstat (limited to 'Command/Move.hs')
| -rw-r--r-- | Command/Move.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Move.hs b/Command/Move.hs index 4291d221a..d96d36138 100644 --- a/Command/Move.hs +++ b/Command/Move.hs @@ -136,7 +136,7 @@ fromPerform move key = do else return Nothing -- fail fromCleanup :: Bool -> Git.Repo -> Key -> CommandCleanup fromCleanup True remote key = do - ok <- Remotes.onRemote remote boolSystem False "dropkey" + ok <- Remotes.onRemote remote (boolSystem, False) "dropkey" ["--quiet", "--force", "--backend=" ++ backendName key, keyName key] |