Fix. Propagate error from reader.

```lua
function reader() return nil, "some error" end
local ok, err = arc:write('test.txt', fileDesc, reader)
assert(ok == nil)
assert(err == "some error")
-- !!! But zip archive contain test.txt file with zero size
```