diff options
author | Joey Hess <joey@kitenet.net> | 2012-09-21 20:24:08 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-09-21 20:24:08 -0400 |
commit | 1722c23f56c45d8af36996355816e49fba110959 (patch) | |
tree | 0d610fd396d24c40f02425a09f4b96367efa562b /Remote/Git.hs | |
parent | a8e1b3ad42124222fda965d33360c8afdb064d10 (diff) |
fix logic error introduced yesterday
Diffstat (limited to 'Remote/Git.hs')
-rw-r--r-- | Remote/Git.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index c10347f98..330fb3a13 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -299,7 +299,7 @@ rsyncHelper callback params = do - filesystem. Then cp could be faster. -} rsyncOrCopyFile :: [CommandParam] -> FilePath -> FilePath -> MeterUpdate -> Annex Bool rsyncOrCopyFile rsyncparams src dest p = - ifM (sameDeviceIds src dest) (dorsync, docopy) + ifM (sameDeviceIds src dest) (docopy, dorsync) where sameDeviceIds a b = (==) <$> (getDeviceId a) <*> (getDeviceId b) getDeviceId f = deviceID <$> liftIO (getFileStatus $ parentDir f) |