X-Git-Url: https://git.rkrishnan.org/?p=functorrent.git;a=blobdiff_plain;f=src%2FFuncTorrent%2FFileSystem.hs;h=7c95c1e2ffcffe330681c626bbf21c95e9c63d8d;hp=5568b77d00e754d452fe5e56933ab9eb812f016e;hb=08f3238a8162039a1b77f4fb8825a56a34203c02;hpb=aa5477676dd98fb07a2afa118c29f98a4885fdc9 diff --git a/src/FuncTorrent/FileSystem.hs b/src/FuncTorrent/FileSystem.hs index 5568b77..7c95c1e 100644 --- a/src/FuncTorrent/FileSystem.hs +++ b/src/FuncTorrent/FileSystem.hs @@ -86,7 +86,7 @@ run' pieceMap c handle = do VerifyPiece n var -> do isHashValid <- verifyPiece n putMVar var isHashValid - GetStats var -> do + GetStats var -> putMVar var stats readPiece n len' = do let offset = pieceNumToOffset pieceMap n