From b5ca4df9ecf906e6640be362708face2215b5469 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 18 Mar 2013 23:05:23 -0400
Subject: new alert while scanning

Like the old one, but does not mention which remotes are scanned.
I think this is less confusing, as it does not imply the remotes
were somehow accessed (which they are not; inaccessible remotes
can be scanned.)
---
 Assistant/Alert.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'Assistant/Alert.hs')

diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs
index 206694031..25ddaf3ce 100644
--- a/Assistant/Alert.hs
+++ b/Assistant/Alert.hs
@@ -240,6 +240,13 @@ commitAlert = activityAlert Nothing
 showRemotes :: [Remote] -> TenseChunk
 showRemotes = UnTensed . T.intercalate ", " . map (T.pack . Remote.name)
 
+scanAlert :: Alert
+scanAlert = baseActivityAlert
+	{ alertHeader = Just $
+		tenseWords [Tensed "Scanning" "Scanned", "for file transfers"]
+	, alertPriority = Low
+	}
+
 syncAlert :: [Remote] -> Alert
 syncAlert rs = baseActivityAlert
 	{ alertName = Just SyncAlert
-- 
cgit v1.2.3