diff options
author | 2012-07-18 19:13:56 -0400 | |
---|---|---|
committer | 2012-07-18 19:15:34 -0400 | |
commit | cf47bb3f509ae63ad868b66c0b6f2baecb93e4c7 (patch) | |
tree | 60bfdab5cf877c4de206146c65e759f82cdf2e85 /Logs/Transfer.hs | |
parent | eea0a3616cd1cbaf033649c11a5c2b650b6b632f (diff) |
run file transfers in threads, not processes
This should fix OSX/BSD issues with not noticing transfer information
files with kqueue. Now that threads are used, the thread can manage the
transfer slot allocation and deallocation by itself; much cleaner.
Diffstat (limited to 'Logs/Transfer.hs')
-rw-r--r-- | Logs/Transfer.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/Logs/Transfer.hs b/Logs/Transfer.hs index f74d128dc..1e3d0abdb 100644 --- a/Logs/Transfer.hs +++ b/Logs/Transfer.hs @@ -43,7 +43,6 @@ data TransferInfo = TransferInfo , transferRemote :: Maybe Remote , bytesComplete :: Maybe Integer , associatedFile :: Maybe FilePath - , shouldWait :: Bool } deriving (Show, Eq, Ord) @@ -87,7 +86,6 @@ transfer t file a = do <*> pure Nothing -- not 0; transfer may be resuming <*> pure Nothing <*> pure file - <*> pure False bracketIO (prep tfile mode info) (cleanup tfile) a where prep tfile mode info = do @@ -180,7 +178,6 @@ readTransferInfo pid s = <*> pure Nothing <*> pure Nothing <*> pure (if null filename then Nothing else Just filename) - <*> pure False _ -> Nothing where (bits, filebits) = splitAt 1 $ lines s |