mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
list-packages: Add status link only for systems supported on Hydra.
* build-aux/list-packages.scm (package->sxml)[status]: Intersect (package-transitive-supported-systems package) with %HYDRA-SUPPORTED-SYSTEMS.
This commit is contained in:
parent
abcbda48c2
commit
75c5475f31
1 changed files with 5 additions and 1 deletions
|
@ -167,7 +167,11 @@ (define (url system)
|
|||
,system))
|
||||
|
||||
`(div "status: "
|
||||
,(list-join (map url (package-transitive-supported-systems package))
|
||||
,(list-join (map url
|
||||
(lset-intersection
|
||||
string=?
|
||||
%hydra-supported-systems
|
||||
(package-transitive-supported-systems package)))
|
||||
" ")))
|
||||
|
||||
(define (package-logo name)
|
||||
|
|
Loading…
Reference in a new issue