suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

http-client: don't try to gunzip an empty stream

Browse Source
This commit is contained in:
John Clements 2015-09-02 14:31:22 -07:00
parent 98b819edd4
commit 28d5ae19f9
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/collects/net/http-client.rkt
View File

@ -261,7 +261,9 @@
(define decoded-response-port (define decoded-response-port
(cond (cond
[head? raw-response-port] [head? raw-response-port]
[(and (memq 'gzip decodes) (regexp-member #rx#"^(?i:Content-Encoding: +gzip)$" headers)) [(and (memq 'gzip decodes)
(regexp-member #rx#"^(?i:Content-Encoding: +gzip)$" headers)
(not (eof-object? (peek-byte raw-response-port))))
(define-values (in out) (make-pipe PIPE-SIZE)) (define-values (in out) (make-pipe PIPE-SIZE))
(define gunzip-t (define gunzip-t
(thread (thread