guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

03/06: download: Remove Guile 2.0 workaround.


From: guix-commits
Subject: 03/06: download: Remove Guile 2.0 workaround.
Date: Wed, 9 Jan 2019 09:10:14 -0500 (EST)

civodul pushed a commit to branch master
in repository guix.

commit c3d9bca48a95a535a26eda38707dcd9798400ff3
Author: Ludovic Courtès <address@hidden>
Date:   Mon Jan 7 10:42:26 2019 +0100

    download: Remove Guile 2.0 workaround.
    
    * guix/build/download.scm: Remove Guile 2.0 workaround.
---
 guix/build/download.scm | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/guix/build/download.scm b/guix/build/download.scm
index 199702a..24b5aa3 100644
--- a/guix/build/download.scm
+++ b/guix/build/download.scm
@@ -504,18 +504,6 @@ port if PORT is a TLS session record port."
   (module-set! (resolve-module '(web http))
                'parse-rfc-822-date parse-rfc-822-date))
 
-;; XXX: Work around <http://bugs.gnu.org/19840>, present in Guile
-;; up to 2.0.11.
-(unless (or (> (string->number (major-version)) 2)
-            (> (string->number (minor-version)) 0)
-            (> (string->number (micro-version)) 11))
-  (let ((var (module-variable (resolve-module '(web http))
-                              'declare-relative-uri-header!)))
-    ;; If 'declare-relative-uri-header!' doesn't exist, forget it.
-    (when (and var (variable-bound? var))
-      (let ((declare-relative-uri-header! (variable-ref var)))
-        (declare-relative-uri-header! "Location")))))
-
 ;; XXX: Work around broken proxy handling on Guile 2.2 <= 2.2.2, fixed in
 ;; Guile commits 7d0d9e2c25c1e872cfc7d14ab5139915f1813d56 and
 ;; 6ad28ae3bc6a6d9e95ab7d70510d12c97673a143.  See bug report at



reply via email to

[Prev in Thread] Current Thread [Next in Thread]