summaryrefslogtreecommitdiff
path: root/Assistant/Threads/TransferScanner.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-07-25 12:07:30 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-07-25 12:07:30 -0400
commit6107328a6b981ec8130e4154be1ebe7bc11979df (patch)
tree8006e022a2f4896d643720d8c366aa0f2bf399a2 /Assistant/Threads/TransferScanner.hs
parent522f568450a005ae81b24f63bb37e75320b51219 (diff)
avoid spawning new transfer thread until a slot becomes available
Diffstat (limited to 'Assistant/Threads/TransferScanner.hs')
-rw-r--r--Assistant/Threads/TransferScanner.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/TransferScanner.hs b/Assistant/Threads/TransferScanner.hs
index 0a40f7ead..485506e7d 100644
--- a/Assistant/Threads/TransferScanner.hs
+++ b/Assistant/Threads/TransferScanner.hs
@@ -19,7 +19,7 @@ thisThread :: ThreadName
thisThread = "TransferScanner"
{- This thread scans remotes, to find transfers that need to be made to
- - keep their data in sync. The transfers are queued with lot priority. -}
+ - keep their data in sync. The transfers are queued with low priority. -}
transferScannerThread :: ThreadState -> ScanRemoteMap -> TransferQueue -> IO ()
transferScannerThread st scanremotes transferqueue = do
runEvery (Seconds 2) $ do