summaryrefslogtreecommitdiff
path: root/Command/Sync.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Sync.hs')
-rw-r--r--Command/Sync.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Sync.hs b/Command/Sync.hs
index 6ef111bc4..acd487df3 100644
--- a/Command/Sync.hs
+++ b/Command/Sync.hs
@@ -513,7 +513,7 @@ syncFile rs f (k, _) = do
-- Using callCommand rather than commandAction for drops,
-- because a failure to drop does not mean the sync failed.
handleDropsFrom (putrs ++ locs) rs "unwanted" True k (Just f)
- Nothing callCommand
+ Nothing callCommandAction
where
wantget have = allM id
[ pure (not $ null have)