avoid sending xmpp push notifications when not pushing to any remotes

This commit is contained in:
Joey Hess 2012-11-10 14:52:25 -04:00
parent 957e742dfc
commit ec186d6369

View file

@ -100,6 +100,7 @@ pushToRemotes now notifypushes remotes = do
return ret
where
go _ Nothing _ _ _ = return True -- no branch, so nothing to do
go _ _ _ _ [] = return True -- no remotes, so nothing to do
go shouldretry (Just branch) g u rs = do
debug ["pushing to", show rs]
liftIO $ Command.Sync.updateBranch (Command.Sync.syncBranch branch) g