diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-11-10 11:58:43 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-11-10 11:58:43 +0100 |
| commit | 324a2ba56c2f4c0d91567ed08024ae2c492f3b23 (patch) | |
| tree | 4ae14e3baceab7cca2cce48486e295134de71610 /tests | |
| parent | 8033772363b287ca529461e575ceb4a69d7af942 (diff) | |
tests: Adjust 'url-fetch' mocks to TLS changes.
This is a followup to bc3c41ce36349ed4ec758c70b48a7059e363043a.
* tests/cpan.scm ("cpan->guix-package"): Add #:verify-certificate?
parameter in 'url-fetch' mock.
* tests/cran.scm ("description->package"): Likewise.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/cpan.scm | 4 | ||||
| -rw-r--r-- | tests/cran.scm | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/tests/cpan.scm b/tests/cpan.scm index 80ff044abd..e37fc437fc 100644 --- a/tests/cpan.scm +++ b/tests/cpan.scm @@ -61,7 +61,9 @@ (test-assert "cpan->guix-package" ;; Replace network resources with sample data. (mock ((guix build download) url-fetch - (lambda* (url file-name #:key (mirrors '())) + (lambda* (url file-name + #:key + (mirrors '()) verify-certificate?) (with-output-to-file file-name (lambda () (display diff --git a/tests/cran.scm b/tests/cran.scm index 896c5af06c..f92934c468 100644 --- a/tests/cran.scm +++ b/tests/cran.scm @@ -89,7 +89,9 @@ Date/Publication: 2015-07-14 14:15:16 (test-assert "description->package" ;; Replace network resources with sample data. (mock ((guix build download) url-fetch - (lambda* (url file-name #:key (mirrors '())) + (lambda* (url file-name + #:key + (mirrors '()) verify-certificate?) (with-output-to-file file-name (lambda () (display |