diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-05-21 20:04:38 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-05-21 20:04:38 -0400 |
| commit | e93cbb52e8d14dc88ef758654e0122d8b35b1e5f (patch) | |
| tree | e7cf7cfd3cdb5c648aa92d4b02873491a11046a6 /Assistant/Sync.hs | |
| parent | c1f85cefd886c0e92747e6d9fc05c36dc6e31ea8 (diff) | |
include HEAD in CanPush shas
Diffstat (limited to 'Assistant/Sync.hs')
| -rw-r--r-- | Assistant/Sync.hs | 3 |
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 |