Skip to content
Snippets Groups Projects
Commit 89be37a5 authored by Ludovic Courtès's avatar Ludovic Courtès
Browse files

web: Add workaround for <http://bugs.gnu.org/13095>. 

* guix/web.scm: Add workaround for <http://bugs.gnu.org/13095>.
parent 61ef22f4
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 4 additions and 0 deletions
guix/web.scm
+ 4
− 0
View file @ 89be37a5
...@@ -136,6 +136,10 @@ (define bad-response ...@@ -136,6 +136,10 @@ (define bad-response
(module-set! (resolve-module '(web response)) (module-set! (resolve-module '(web response))
'read-response-body read-response-body*))) 'read-response-body read-response-body*)))
;; XXX: Work around <http://bugs.gnu.org/13095>, present in Guile
;; up to 2.0.7.
(module-define! (resolve-module '(web client))
'shutdown (const #f))
(define* (http-fetch uri #:key (text? #f)) (define* (http-fetch uri #:key (text? #f))
"Return an input port containing the data at URI, and the expected number of "Return an input port containing the data at URI, and the expected number of
......
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