diff options
Diffstat (limited to 'Command/Sync.hs')
-rw-r--r-- | Command/Sync.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Sync.hs b/Command/Sync.hs index 052f54c44..4fe5e5bc4 100644 --- a/Command/Sync.hs +++ b/Command/Sync.hs @@ -130,8 +130,8 @@ mergeRemote :: Remote.Remote Annex -> Git.Ref -> CommandCleanup mergeRemote remote branch = all id <$> mapM go [branch, syncBranch branch] where go b = do - e <- inRepo $ Git.Branch.changed branch b - if e + c <- inRepo $ Git.Branch.changed b (remotebranch b) + if c then mergeFrom $ remotebranch b else return True remotebranch = Git.Ref.under $ |