diff options
author | 2013-01-26 17:09:33 +1100 | |
---|---|---|
committer | 2013-01-26 17:09:33 +1100 | |
commit | dc60216eb8fe919acf7ab3984a5f0bf0e0193f6b (patch) | |
tree | 7fb8c8bd0189f1868e732fc1c6047df933333ecf /Assistant/Threads/DaemonStatus.hs | |
parent | f0f97334d017eac6d1693bac90c772022fa57aa7 (diff) |
webapp: Now allows restarting any threads that crash.
Diffstat (limited to 'Assistant/Threads/DaemonStatus.hs')
-rw-r--r-- | Assistant/Threads/DaemonStatus.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/DaemonStatus.hs b/Assistant/Threads/DaemonStatus.hs index 07f0986a6..fffc6ed37 100644 --- a/Assistant/Threads/DaemonStatus.hs +++ b/Assistant/Threads/DaemonStatus.hs @@ -16,7 +16,7 @@ import Utility.NotificationBroadcaster - frequently than once every ten minutes. -} daemonStatusThread :: NamedThread -daemonStatusThread = NamedThread "DaemonStatus" $ do +daemonStatusThread = namedThread "DaemonStatus" $ do notifier <- liftIO . newNotificationHandle =<< changeNotifier <$> getDaemonStatus checkpoint |