diff --git a/Command/Sync.hs b/Command/Sync.hs index ce4aa0b92d..b4154b798d 100644 --- a/Command/Sync.hs +++ b/Command/Sync.hs @@ -213,7 +213,7 @@ seek' o = do <$> filterM (not <$$> liftIO . getDynamicConfig . remoteAnnexIgnore . Remote.gitconfig) remotes let (exportremotes, nonexportremotes) = partition (exportTree . Remote.config) dataremotes let importremotes = filter (importTree . Remote.config) dataremotes - let keyvalueremotes = partition (not . importTree . Remote.config) nonexportremotes + let keyvalueremotes = filter (not . importTree . Remote.config) nonexportremotes if cleanupOption o then do