me
/
guix
Archived
1
0
Fork 0
Code

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.
master
Ludovic Courtès 2015-05-01 16:10:08 +02:00
parent abcbda48c2
commit 75c5475f31
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
build-aux/list-packages.scm
View File

@ -167,7 +167,11 @@ decreasing, is 1."
,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)