aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-11-29 16:10:10 +0100
committerLudovic Courtès <ludo@gnu.org>2016-11-29 16:12:31 +0100
commit3e95d88d51a63854d44cbf8c8caa47b26d81e091 (patch)
tree3aa7b9993d1d61571e81e975caffd5ee1dab4efe
parente9c72306fdfd6a60158918850cb25d0ff3837d16 (diff)
downloadpatches-3e95d88d51a63854d44cbf8c8caa47b26d81e091.tar
patches-3e95d88d51a63854d44cbf8c8caa47b26d81e091.tar.gz
gnu-maintenance: 'latest-kde-release' honors 'upstream-name' properties.
* guix/gnu-maintenance.scm (latest-kde-release): Honor the 'upstream-name' property of PACKAGE.
-rw-r--r--guix/gnu-maintenance.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index 78392c9a11..6c6c0722d5 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -525,7 +525,8 @@ elpa.gnu.org, and all the GNOME packages."
(let ((uri (string->uri (origin-uri (package-source package)))))
(false-if-ftp-error
(latest-ftp-release
- (package-name package)
+ (or (assoc-ref (package-properties package) 'upstream-name)
+ (package-name package))
#:server "mirrors.mit.edu"
#:directory
(string-append "/kde" (dirname (dirname (uri-path uri))))