summary refs log tree commit diff
path: root/tests/cpan.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-02-13 16:04:09 +0100
committerLudovic Courtès <ludo@gnu.org>2017-02-13 16:04:09 +0100
commitce8963c5b7a728257920aeceeb89e40d166d09f4 (patch)
treedb16b5c43742f872fb006570ac26b874225dfca1 /tests/cpan.scm
parent824e5fe6404e6ae42ffab3270326b4e6da9c8223 (diff)
downloadguix-ce8963c5b7a728257920aeceeb89e40d166d09f4.tar.gz
tests: Adjust for 'http-fetch' change in (guix import json).
This is a followup to commit 81e0bc1834490a1a8092c75a0733b15c2b407285.

* tests/cpan.scm ("cpan->guix-package"): Add a 'rest' argument to the
lambda that mocks 'http-fetch'.
* tests/crate.scm ("crate->guix-package"): Likewise.
* tests/gem.scm ("gem->guix-package"): Likewise.
* tests/pypi.scm ("pypi->guix-package"): Likewise.
("pypi->guix-package, wheels"): Likewise.
Diffstat (limited to 'tests/cpan.scm')
-rw-r--r--tests/cpan.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/cpan.scm b/tests/cpan.scm
index 0c28a74d3e..8b588517c9 100644
--- a/tests/cpan.scm
+++ b/tests/cpan.scm
@@ -72,7 +72,7 @@
                    test-source)
                   (_ (error "Unexpected URL: " url))))))))
         (mock ((guix http-client) http-fetch
-               (lambda (url)
+               (lambda (url . rest)
                  (match url
                    ("https://api.metacpan.org/release/Foo-Bar"
                     (values (open-input-string test-json)