aboutsummaryrefslogtreecommitdiff
path: root/Assistant/Alert.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-04-10 17:52:04 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-04-10 17:52:04 -0400
commitce33f39e4d669cb3f703e8d0fed37df7eef62cdb (patch)
tree4f4bbab1e4743b9a999d230a421578286a4a9c80 /Assistant/Alert.hs
parente4a3fbd2c97db81ce4ac2f8fe493a5331ff2fa58 (diff)
display alert in webapp when assistant shuts down
and remove any activity alerts
Diffstat (limited to 'Assistant/Alert.hs')
-rw-r--r--Assistant/Alert.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs
index 944da07d9..99e57e4b2 100644
--- a/Assistant/Alert.hs
+++ b/Assistant/Alert.hs
@@ -81,6 +81,11 @@ startupScanAlert :: Alert
startupScanAlert = activityAlert Nothing
[Tensed "Performing" "Performed", "startup scan"]
+{- Displayed when a shutdown is occurring, so will be seen after shutdown
+ - has happened. -}
+shutdownAlert :: Alert
+shutdownAlert = warningAlert "shutdown" "git-annex has been shut down"
+
commitAlert :: Alert
commitAlert = activityAlert Nothing
[Tensed "Committing" "Committed", "changes to git"]