Subject: [bug#63571] [PATCH 11/14] import: cpan: Remove unary 'string-append' call.

From: Ludovic Courtès <[email-masked]>
Date: Thu, 18 May 2023 17:16:19 +0200

* guix/import/cpan.scm (package->upstream-name): Remove useless
'string-append'.
---
 guix/import/cpan.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm
index da47018c35..d7f300777e 100644
--- a/guix/import/cpan.scm
+++ b/guix/import/cpan.scm
@@ -154,7 +154,7 @@ (define (package->upstream-name package)
           ((? 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)))
-- 
2.40.1