summaryrefslogtreecommitdiff
path: root/Assistant/Alert.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Assistant/Alert.hs')
-rw-r--r--Assistant/Alert.hs7
1 files changed, 7 insertions, 0 deletions
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