[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#44745: tests/lint.scm fails building guix with guile-2.2
From: |
zimoun |
Subject: |
bug#44745: tests/lint.scm fails building guix with guile-2.2 |
Date: |
Fri, 20 Nov 2020 10:32:25 +0100 |
Hi Vagrant,
On Thu, 19 Nov 2020 at 16:35, Vagrant Cascadian <vagrant@debian.org> wrote:
> test-name: archival: missing content
> location: /build/guix-EdK9LP/guix-1.2.0~rc2/tests/lint.scm:921
> source:
> + (test-assert
> + "archival: missing content"
> + (let* ((origin
> + (origin
> + (method url-fetch)
> + (uri "http://example.org/foo.tgz")
> + (sha256 (make-bytevector 32))))
> + (warnings
> + (with-http-server
> + '((404 "Not archived."))
> + (parameterize
> + ((%swh-base-url (%local-url)))
> + (check-archival
> + (dummy-package "x" (source origin)))))))
> + (warning-contains? "not archived" warnings)))
> actual-value: #f
> actual-error:
> + (keyword-argument-error
> + #<procedure http-request (uri #:key body port method version keep-alive?
> headers decode-body? streaming? request)>
> + "Unrecognized keyword"
> + ()
> + (#:verify-certificate?))
> result: FAIL
>
I remember issues fixed by 722ad41c44a499d2250c79527ef7d069ca728de0
which maybe introduce a regression for Guile 2.2.
--8<---------------cut here---------------start------------->8---
+;; XXX: Work around a bug in Guile 3.0.2 where #:verify-certificate? would
+;; be ignored (<https://bugs.gnu.org/40486>).
+(define* (http-get* uri #:rest rest)
+ (apply http-request uri #:method 'GET rest))
+(define* (http-post* uri #:rest rest)
--8<---------------cut here---------------end--------------->8---
Maybe it is related.
All the best,
simon