diff options
| -rw-r--r-- | guix/import/cpan.scm | 5 | ||||
| -rw-r--r-- | tests/import/cpan.scm | 2 |
2 files changed, 4 insertions, 3 deletions
diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm index bc5dfd18479..3d4508b11e6 100644 --- a/guix/import/cpan.scm +++ b/guix/import/cpan.scm @@ -287,6 +287,7 @@ in RELEASE, a <cpan-release> record." (let* ((tarball (with-store store (download-to-store store source-url))) (inputs (cpan-module-inputs release)) + (synopsis-text (cpan-release-abstract release)) (sexp `(package (name ,(cpan-name->downstream-name name)) @@ -305,8 +306,8 @@ in RELEASE, a <cpan-release> record." (filter (upstream-input-type-predicate 'propagated) inputs)) (home-page ,(cpan-home name)) - (synopsis ,(cpan-release-abstract release)) - (description fill-in-yourself!) + (synopsis ,synopsis-text) + (description ,(string-append synopsis-text ".")) (license ,(string->license (cpan-release-license release)))))) (values sexp (map upstream-input-name inputs)))) diff --git a/tests/import/cpan.scm b/tests/import/cpan.scm index 42e8c4e42c1..aec66122fb1 100644 --- a/tests/import/cpan.scm +++ b/tests/import/cpan.scm @@ -86,7 +86,7 @@ (propagated-inputs (list perl-test-script)) (home-page "https://metacpan.org/release/Foo-Bar") (synopsis "Fizzle Fuzz") - (description fill-in-yourself!) + (description "Fizzle Fuzz.") (license perl-license)) (string=? (bytevector->nix-base32-string (call-with-input-string test-source port-sha256)) |