aboutsummaryrefslogtreecommitdiff
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
guix-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