From c91b368e96de9446bab37e7fab7d7c8ba71af946 Mon Sep 17 00:00:00 2001 From: Alex Sassmannshausen Date: Sat, 12 Nov 2016 17:12:53 +0100 Subject: import/cpan: Maybe coerce version to string. * guix/import/cpan.scm (cpan-module->sexp) : Test if version in meta is string or number. If it is number, coerce to string. --- guix/import/cpan.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'guix') diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm index 5b7c47554a..d244969c9e 100644 --- a/guix/import/cpan.scm +++ b/guix/import/cpan.scm @@ -128,7 +128,9 @@ (define (guix-name name) (string-append "perl-" (string-downcase name)))) (define version - (assoc-ref meta "version")) + (match (assoc-ref meta "version") + ((? number? vrs) (number->string vrs)) + ((? string? vrs) vrs))) (define core-module? (let ((perl-version (package-version perl)) -- cgit v1.2.3