From cc9b70d3ea708e4364b0a090d8a6efebabd8c0e9 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Fri, 20 Feb 2015 16:02:43 -0600 Subject: import: cpan: Update tests for dependency handling. * tests/cpan.scm (test-json): Remove core module dependencies. [cpan->guix-package]: Add mock url handling for module api. Adjust expected native-inputs and license. --- tests/cpan.scm | 14 +++----------- 1 file changed, 3 insertions(+), 11 deletions(-) diff --git a/tests/cpan.scm b/tests/cpan.scm index af7b36e684..2f9513519e 100644 --- a/tests/cpan.scm +++ b/tests/cpan.scm @@ -28,15 +28,8 @@ "{ \"metadata\" : { \"prereqs\" : { - \"configure\" : { - \"requires\" : { - \"ExtUtils::MakeMaker\" : \"0\", - \"Module::Build\" : \"0.28\" - } - }, \"runtime\" : { \"requires\" : { - \"Getopt::Std\" : \"0\", \"Test::Script\" : \"1.05\", } } @@ -70,6 +63,8 @@ (match url ("http://api.metacpan.org/release/Foo-Bar" test-json) + ("http://api.metacpan.org/module/Test::Script" + "{ \"distribution\" : \"Test-Script\" }") ("http://example.com/Foo-Bar-0.1.tar.gz" test-source) (_ (error "Unexpected URL: " url)))))))) @@ -85,16 +80,13 @@ ('base32 (? string? hash))))) ('build-system 'perl-build-system) - ('native-inputs - ('quasiquote - (("perl-module-build" ('unquote 'perl-module-build))))) ('inputs ('quasiquote (("perl-test-script" ('unquote 'perl-test-script))))) ('home-page "http://search.cpan.org/dist/Foo-Bar") ('synopsis "Fizzle Fuzz") ('description 'fill-in-yourself!) - ('license 'gpl1+)) + ('license (package-license perl))) (string=? (bytevector->nix-base32-string (call-with-input-string test-source port-sha256)) hash)) -- cgit v1.2.3