diff options
author | Ludovic Courtès <ludo@gnu.org> | 2021-03-13 22:35:28 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-03-17 12:03:24 +0100 |
commit | 1d5a946ce506adc4196aa46032350eb2c7e68d09 (patch) | |
tree | 34f871f4e19f0db289aa29ba33683ed2e9bb1fe1 /guix | |
parent | 99f42e14d4de7c611442fe11a1eb0eed008c24ec (diff) |
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.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/gnu-maintenance.scm | 7 |
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 |