mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

tuple makes it clearer

Browse source
This commit is contained in:
Joey Hess 2010-12-31 15:52:59 -04:00
parent eac433a84a
commit 30e0065ab9
2 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Move.hs
View file

@ -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]