diff --git a/Command/Assist.hs b/Command/Assist.hs index aaa8ea0376..de26d6c87a 100644 --- a/Command/Assist.hs +++ b/Command/Assist.hs @@ -11,6 +11,7 @@ import Command import qualified Command.Sync import qualified Command.Add import Annex.CheckIgnore +import qualified Annex.Queue cmd :: Command cmd = withAnnexOptions [jobsOption, backendOption] $ @@ -32,6 +33,8 @@ myseek o = startConcurrency transferStages $ do , Command.Add.checkGitIgnoreOption = CheckGitIgnore (False) , Command.Add.dryRunOption = DryRun False } - + -- Flush added files to index so they will be committed. + Annex.Queue.flush + Command.Sync.prepMerge Command.Sync.seek' o