fix math error that caused resumes to always fail
This commit is contained in:
parent
db79b69aa0
commit
0541f19bea
2 changed files with 3 additions and 2 deletions
|
@ -125,4 +125,4 @@ runLocal runmode runner a = case a of
|
|||
hSeek h AbsoluteSeek o
|
||||
L.hPut h b
|
||||
sz <- getFileSize dest
|
||||
return (toInteger sz == l)
|
||||
return (toInteger sz == l + o)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue