summaryrefslogtreecommitdiff
path: root/Assistant/Threads/SanityChecker.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-10-12 01:17:45 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-10-12 01:17:45 -0400
commit98d458727dee6c93ee4d672366449fcadd8a376d (patch)
tree7d4620c43a2797ffdfc8c668a185f9a08640d7a0 /Assistant/Threads/SanityChecker.hs
parentb40a3410ac24693999b894d6154de3ea2a7ae804 (diff)
use gitRepo
Diffstat (limited to 'Assistant/Threads/SanityChecker.hs')
-rw-r--r--Assistant/Threads/SanityChecker.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/SanityChecker.hs b/Assistant/Threads/SanityChecker.hs
index f01b63de3..912270090 100644
--- a/Assistant/Threads/SanityChecker.hs
+++ b/Assistant/Threads/SanityChecker.hs
@@ -74,7 +74,7 @@ oneDay = 24 * 60 * 60
- will block the watcher. -}
check :: ThreadState -> DaemonStatusHandle -> TransferQueue -> ChangeChan -> IO Bool
check st dstatus transferqueue changechan = do
- g <- runThreadState st $ fromRepo id
+ g <- runThreadState st gitRepo
-- Find old unstaged symlinks, and add them to git.
(unstaged, cleanup) <- Git.LsFiles.notInRepo False ["."] g
now <- getPOSIXTime