~ruther/guix-local: import: cpan: Remove unary 'string-append' call.

f13e73df102c6b1d429df2ac898e438ed0cd76a6 — Ludovic Courtès 3 years ago 5d022d5

import: cpan: Remove unary 'string-append' call.

* guix/import/cpan.scm (package->upstream-name): Remove useless
'string-append'.

patch browse .tar.gz .zip

1 files changed, 1 insertions(+), 1 deletions(-)

M guix/import/cpan.scm

M guix/import/cpan.scm => guix/import/cpan.scm +1 -1

@@ 154,7 154,7 @@ return \"Test-Simple\""
           ((? origin? origin)
            (match (origin-uri origin)
              ((or (? string? url) (url _ ...))
-              (match (string-match (string-append "([^/]*)-v?[0-9\\.]+") url)
+              (match (string-match "([^/]*)-v?[0-9\\.]+" url)
                 (#f #f)
                 (m (match:substring m 1))))
              (_ #f)))