remove the "running" alert
This commit is contained in:
parent
81b9023ff7
commit
5de897e8d7
2 changed files with 0 additions and 9 deletions
|
@ -174,13 +174,6 @@ activityAlert header message = baseActivityAlert
|
||||||
startupScanAlert :: Alert
|
startupScanAlert :: Alert
|
||||||
startupScanAlert = activityAlert Nothing "Performing startup scan"
|
startupScanAlert = activityAlert Nothing "Performing startup scan"
|
||||||
|
|
||||||
runningAlert :: Alert
|
|
||||||
runningAlert = baseActivityAlert
|
|
||||||
{ alertClass = Success
|
|
||||||
, alertMessage = StringAlert "Running"
|
|
||||||
, alertPriority = Pinned
|
|
||||||
}
|
|
||||||
|
|
||||||
pushAlert :: [Remote] -> Alert
|
pushAlert :: [Remote] -> Alert
|
||||||
pushAlert rs = activityAlert Nothing $
|
pushAlert rs = activityAlert Nothing $
|
||||||
"Syncing with " ++ unwords (map Remote.name rs)
|
"Syncing with " ++ unwords (map Remote.name rs)
|
||||||
|
|
|
@ -87,8 +87,6 @@ startupScan st dstatus scanner = do
|
||||||
modifyDaemonStatus_ dstatus $ \s -> s { scanComplete = True }
|
modifyDaemonStatus_ dstatus $ \s -> s { scanComplete = True }
|
||||||
|
|
||||||
return (True, r)
|
return (True, r)
|
||||||
|
|
||||||
void $ addAlert dstatus runningAlert
|
|
||||||
|
|
||||||
return r
|
return r
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue