From 4b9b9b494757e04ec5c449666d5a0a063378cdb3 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 13 Jun 2012 17:54:23 -0400
Subject: add sanity checker thread

Currently wakes up once a day, and does nothing. :)
---
 Assistant.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Assistant.hs')

diff --git a/Assistant.hs b/Assistant.hs
index eb8fd7054..3d819a018 100644
--- a/Assistant.hs
+++ b/Assistant.hs
@@ -45,6 +45,7 @@ import Assistant.ThreadedMonad
 import Assistant.DaemonStatus
 import Assistant.Watcher
 import Assistant.Committer
+import Assistant.SanityChecker
 import qualified Utility.Daemon
 import Utility.LogFile
 
@@ -71,6 +72,7 @@ startDaemon foreground
 				-- is taking place.
 				_ <- forkIO $ commitThread st changechan
 				_ <- forkIO $ daemonStatusThread st dstatus
+				_ <- forkIO $ sanityCheckerThread st dstatus
 				watchThread st dstatus changechan
 
 stopDaemon :: Annex ()
-- 
cgit v1.2.3