diff options
-rw-r--r-- | Assistant/DaemonStatus.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/DaemonStatus.hs b/Assistant/DaemonStatus.hs index ed73c210a..fc607767b 100644 --- a/Assistant/DaemonStatus.hs +++ b/Assistant/DaemonStatus.hs @@ -230,7 +230,7 @@ updateAlertMap a = notifyAlert `after` modifyDaemonStatus_ update where update s = let !m = a (alertMap s) - in s { alertMap = a (alertMap s) } + in s { alertMap = m } {- Displays an alert while performing an activity that returns True on - success. |