diff mbox series

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

Message ID a3fcea7c70c0f8dda6011610135cf48119df6ece.1684421460.git.ludo@gnu.org
State New
Headers show
Series 'guix refresh -u' updates input fields | expand

Commit Message

Ludovic Courtès May 18, 2023, 3:16 p.m. UTC
* guix/import/cpan.scm (package->upstream-name): Remove useless
'string-append'.
---
 guix/import/cpan.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
diff mbox series

Patch

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)))