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

Work around <http://bugs.gnu.org/13095> in build-aux/download.scm.

* build-aux/download.scm: Annihilate `shutdown' in (web client).
  Reported by Aljosha Papsch.
parent ce41a462
No related branches found
No related tags found
No related merge requests found
...@@ -34,6 +34,11 @@ (define %url-base ...@@ -34,6 +34,11 @@ (define %url-base
;;"http://www.fdn.fr/~lcourtes/software/guix/packages" ;;"http://www.fdn.fr/~lcourtes/software/guix/packages"
) )
;; 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 (file-name->uri file) (define (file-name->uri file)
"Return the URI for FILE." "Return the URI for FILE."
(match (string-tokenize file (char-set-complement (char-set #\/))) (match (string-tokenize file (char-set-complement (char-set #\/)))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment