summaryrefslogtreecommitdiff
path: root/Assistant
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-07-30 18:26:36 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-07-30 18:26:36 -0400
commit5de897e8d70d82effe389fddf4b8be287b5f738f (patch)
treee5f9f2e417119fb6f84ec28e68d7754db4a83881 /Assistant
parent81b9023ff7ec8b3c0df992804e73a9299fc9749a (diff)
remove the "running" alert
Diffstat (limited to 'Assistant')
-rw-r--r--Assistant/Alert.hs7
-rw-r--r--Assistant/Threads/Watcher.hs2
2 files changed, 0 insertions, 9 deletions
diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs
index 54192aae6..9a0bba8ae 100644
--- a/Assistant/Alert.hs
+++ b/Assistant/Alert.hs
@@ -174,13 +174,6 @@ activityAlert header message = baseActivityAlert
startupScanAlert :: Alert
startupScanAlert = activityAlert Nothing "Performing startup scan"
-runningAlert :: Alert
-runningAlert = baseActivityAlert
- { alertClass = Success
- , alertMessage = StringAlert "Running"
- , alertPriority = Pinned
- }
-
pushAlert :: [Remote] -> Alert
pushAlert rs = activityAlert Nothing $
"Syncing with " ++ unwords (map Remote.name rs)
diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs
index 51dc57263..8ba015b19 100644
--- a/Assistant/Threads/Watcher.hs
+++ b/Assistant/Threads/Watcher.hs
@@ -87,8 +87,6 @@ startupScan st dstatus scanner = do
modifyDaemonStatus_ dstatus $ \s -> s { scanComplete = True }
return (True, r)
-
- void $ addAlert dstatus runningAlert
return r