avoid sending xmpp push notifications when not pushing to any remotes

1 files changed, 1 insertions, 0 deletions

diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs
index 8d7ead31d..8815f40c8 100644
--- a/Assistant/Sync.hs
+++ b/Assistant/Sync.hs
@@ -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