diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-10-08 11:48:28 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-10-08 11:48:28 -0400 |
| commit | 7ea377dadf61a4acf8ecdfec39954e7b4344c65f (patch) | |
| tree | f37feed88774b13c8d503484d5e1417441d84ffb /Assistant/DaemonStatus.hs | |
| parent | 6abf023cb98a5d3b2f9fb251055270e576570983 (diff) | |
half way complete cronner thread to run scheduled activities
Diffstat (limited to 'Assistant/DaemonStatus.hs')
| -rw-r--r-- | Assistant/DaemonStatus.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Assistant/DaemonStatus.hs b/Assistant/DaemonStatus.hs index a6893e5a2..7268bbbfb 100644 --- a/Assistant/DaemonStatus.hs +++ b/Assistant/DaemonStatus.hs @@ -76,6 +76,10 @@ updateSyncRemotes = do M.filter $ \alert -> alertName alert /= Just CloudRepoNeededAlert +updateScheduleLog :: Assistant () +updateScheduleLog = + liftIO . sendNotification =<< scheduleLogNotifier <$> getDaemonStatus + {- Load any previous daemon status file, and store it in a MVar for this - process to use as its DaemonStatus. Also gets current transfer status. -} startDaemonStatus :: Annex DaemonStatusHandle |