summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-03-13 22:35:28 +0100
committerLudovic Courtès <ludo@gnu.org>2021-03-17 12:03:24 +0100
commit1d5a946ce506adc4196aa46032350eb2c7e68d09 (patch)
tree34f871f4e19f0db289aa29ba33683ed2e9bb1fe1
parent99f42e14d4de7c611442fe11a1eb0eed008c24ec (diff)
downloadguix-1d5a946ce506adc4196aa46032350eb2c7e68d09.tar.gz
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.
-rw-r--r--guix/gnu-maintenance.scm7
1 files changed, 2 insertions, 5 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index 3bffa4d11e..5aa16acfde 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