08/13: gnu-maintenance: 'latest-html-release' better computes version number.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 1d5a946ce506adc4196aa46032350eb2c7e68d09
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sat Mar 13 22:35:28 2021 +0100

    gnu-maintenance: 'latest-html-release' better computes version number.
    
    * guix/gnu-maintenance.scm (latest-html-release): Use 'tarball->version'
    rather than 'package-name->name+version' to extract the version number.
    This fixes problems with packages like 'netsurf' and 'libdom' that have
    "-src" in their tarball name, where "src" would be taken as the new
    version number.
---
 guix/gnu-maintenance.scm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index 3bffa4d..5aa16ac 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -499,12 +499,9 @@ are unavailable."
                        (string-append base-url directory "/" url)
                        url)))
         (and (release-file? package base)
-             (let-values (((name version)
-                           (package-name->name+version
-                            (tarball-sans-extension base)
-                            #\-)))
+             (let ((version (tarball->version base)))
                (upstream-source
-                (package name)
+                (package package)
                 (version version)
                 (urls (list url))
                 (signature-urls