fix a fenchpost bug when resuming chunked store at end
Discovered thanks to testremote command!
This commit is contained in:
parent
8fce4e4bd7
commit
9636cfd9e1
1 changed files with 1 additions and 1 deletions
|
@ -172,7 +172,7 @@ seekResume h chunkkeys checker = do
|
|||
| pos >= sz = do
|
||||
-- All chunks are already stored!
|
||||
liftIO $ hSeek h AbsoluteSeek sz
|
||||
return (cks', toBytesProcessed sz)
|
||||
return (cks, toBytesProcessed sz)
|
||||
| otherwise = do
|
||||
v <- checker k
|
||||
case v of
|
||||
|
|
Loading…
Add table
Reference in a new issue