ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 06:06:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

import: github: Sort releases before picking the latest one.

Browse source 
* guix/import/github.scm (latest-released-version): Sort releases before
picking the first one as the latest.
This commit is contained in:
Arun Isaac 2019-05-14 15:46:19 +05:30
parent c558772b0f
commit 06c7b1f614
No known key found for this signature in database
GPG key ID: 2E25EE8B61802BB3
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
guix/import/github.scm
View file

@ -206,10 +206,13 @@ (define (release->version release)
API. This may be fixed by using an access token and setting the environment API. This may be fixed by using an access token and setting the environment
variable GUIX_GITHUB_TOKEN, for instance one procured from variable GUIX_GITHUB_TOKEN, for instance one procured from
https://github.com/settings/tokens")) https://github.com/settings/tokens"))
(any release->version (match (sort (filter-map release->version
(match (remove pre-release? json) (match (remove pre-release? json)
(() json) ; keep everything (() json) ; keep everything
(releases releases)))))) (releases releases)))
version>?)
((latest-release . _) latest-release)
(() #f)))))
(define (latest-release pkg) (define (latest-release pkg)
"Return an <upstream-source> for the latest release of PKG." "Return an <upstream-source> for the latest release of PKG."