diff options
author | Joey Hess <joey@kitenet.net> | 2012-10-12 01:17:45 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-10-12 01:17:45 -0400 |
commit | 98d458727dee6c93ee4d672366449fcadd8a376d (patch) | |
tree | 7d4620c43a2797ffdfc8c668a185f9a08640d7a0 /Assistant/Threads/TransferWatcher.hs | |
parent | b40a3410ac24693999b894d6154de3ea2a7ae804 (diff) |
use gitRepo
Diffstat (limited to 'Assistant/Threads/TransferWatcher.hs')
-rw-r--r-- | Assistant/Threads/TransferWatcher.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/TransferWatcher.hs b/Assistant/Threads/TransferWatcher.hs index 33f0dacbe..16d247860 100644 --- a/Assistant/Threads/TransferWatcher.hs +++ b/Assistant/Threads/TransferWatcher.hs @@ -24,7 +24,7 @@ thisThread = "TransferWatcher" - and updates the DaemonStatus's map of ongoing transfers. -} transferWatcherThread :: ThreadState -> DaemonStatusHandle -> TransferQueue -> NamedThread transferWatcherThread st dstatus transferqueue = thread $ do - g <- runThreadState st $ fromRepo id + g <- runThreadState st gitRepo let dir = gitAnnexTransferDir g createDirectoryIfMissing True dir let hook a = Just $ runHandler st dstatus transferqueue a |