From 3695cab949ccd6096f3ce1c121a909416851462c Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Thu, 2 Aug 2012 09:00:13 -0400
Subject: avoid showing alert when there are no remotes to push to

---
 Assistant/Threads/Pusher.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'Assistant/Threads/Pusher.hs')

diff --git a/Assistant/Threads/Pusher.hs b/Assistant/Threads/Pusher.hs
index 3fe85673b..ab0274db1 100644
--- a/Assistant/Threads/Pusher.hs
+++ b/Assistant/Threads/Pusher.hs
@@ -54,8 +54,9 @@ pushThread st dstatus commitchan pushmap = do
 		if shouldPush now commits
 			then do
 				remotes <- knownRemotes <$> getDaemonStatus dstatus
-				void $ alertWhile dstatus (pushAlert remotes) $
-					pushToRemotes thisThread now st (Just pushmap) remotes
+				unless (null remotes) $ 
+					void $ alertWhile dstatus (pushAlert remotes) $
+						pushToRemotes thisThread now st (Just pushmap) remotes
 			else do
 				debug thisThread
 					[ "delaying push of"
-- 
cgit v1.2.3