summaryrefslogtreecommitdiff
path: root/Assistant
diff options
context:
space:
mode:
Diffstat (limited to 'Assistant')
-rw-r--r--Assistant/Sync.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs
index cff4f95e0..fe578ab43 100644
--- a/Assistant/Sync.hs
+++ b/Assistant/Sync.hs
@@ -115,7 +115,8 @@ pushToRemotes' now notifypushes remotes = do
ret <- go True branch g u normalremotes
unless (null xmppremotes) $ do
shas <- liftAnnex $ map fst <$>
- inRepo (Git.Ref.matching [Annex.Branch.fullname, Git.Ref.headRef])
+ inRepo (Git.Ref.matchingWithHEAD
+ [Annex.Branch.fullname, Git.Ref.headRef])
forM_ xmppremotes $ \r -> sendNetMessage $
Pushing (getXMPPClientID r) (CanPush u shas)
return ret