import/cpan: Maybe coerce version to string.

* guix/import/cpan.scm (cpan-module->sexp) <version>: Test if version in
  meta is string or number.  If it is number, coerce to string.
This commit is contained in:
Alex Sassmannshausen 2016-11-12 17:12:53 +01:00
parent d9721bcf27
commit c91b368e96
No known key found for this signature in database
GPG Key ID: 8BC4F4476E8A8E00
1 changed files with 3 additions and 1 deletions

View File

@ -128,7 +128,9 @@ META."
(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))