~ruther/guix-local

bc36105651f236a0d71902ec63207ff6d3112a94 — Ludovic Courtès 11 years ago 7491eda
list-packages: Add Hydra links only for the supported systems.

* build-aux/list-packages.scm (package->sxml)[status]: Use
  'package-transitive-supported-systems' instead of a hard-coded list of
  systems.
1 files changed, 2 insertions(+), 3 deletions(-)

M build-aux/list-packages.scm
M build-aux/list-packages.scm => build-aux/list-packages.scm +2 -3
@@ 162,9 162,8 @@ decreasing, is 1."
          ,system))

    `(div "status: "
          ,(url "x86_64-linux") " "
          ,(url "i686-linux") " "
          ,(url "mips64el-linux")))
          ,(list-join (map url (package-transitive-supported-systems package))
                      " ")))

  (define (package-logo name)
    (and=> (lookup-gnu-package name)