From e74b26fdbc114bfa7b1ce6021d8cd64daea6a859 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 13 Sep 2013 10:37:20 -0500 Subject: [PATCH] adjust the planet resolver to explicitly ask for no compression so that it gets a Content-Length field that it can use back from the server this may or may not be the right long-term fix but for now it at least gets things working again --- racket/collects/planet/private/resolver.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/racket/collects/planet/private/resolver.rkt b/racket/collects/planet/private/resolver.rkt index a18e683661..6ba17bfb28 100644 --- a/racket/collects/planet/private/resolver.rkt +++ b/racket/collects/planet/private/resolver.rkt @@ -762,7 +762,9 @@ See the scribble documentation on the planet/resolver module. (with-handlers ([exn:fail:network? (λ (e) (return (exn-message e)))]) (let* ([target (pkg->download-url pkg)] - [ip (get-impure-port target)] + [ip (get-impure-port + target + (list "Accept-Encoding: identity"))] [head (purify-port ip)] [response-code/str (get-http-response-code head)] [response-code (and response-code/str