diff options
| -rw-r--r-- | Assistant/Alert.hs | 7 | ||||
| -rw-r--r-- | Assistant/Threads/Watcher.hs | 2 |
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 |