Commit f604c42b authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Merge pull request #3385 from edsko/pr/plainHttpTransport206

Don't ignore 206 response in plain-http transport
parents 6ad43eed da403dff
......@@ -635,7 +635,7 @@ plainHttpTransport =
(_, resp) <- cabalBrowse verbosity Nothing (request req)
let code = convertRspCode (rspCode resp)
etag' = lookupHeader HdrETag (rspHeaders resp)
when (code==200) $
when (code==200 || code==206) $
writeFileAtomic destPath $ rspBody resp
return (code, etag')
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment