diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-05-02 22:42:53 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-05-02 22:42:53 +0200 |
commit | b9212a5455304661d1e969ced5df63aa9b6b761f (patch) | |
tree | e2857c8336cc1dbae087ba4717707bc24b4df2dd /build-aux/list-packages.scm | |
parent | a413bc8bd3c2c7d00d8d021a2224a59d26765dad (diff) | |
parent | 5f6887e839c10f0c905969d07baca4e03f453e82 (diff) | |
download | guix-patches-b9212a5455304661d1e969ced5df63aa9b6b761f.tar guix-patches-b9212a5455304661d1e969ced5df63aa9b6b761f.tar.gz |
Merge branch 'core-updates'
Diffstat (limited to 'build-aux/list-packages.scm')
-rwxr-xr-x | build-aux/list-packages.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/build-aux/list-packages.scm b/build-aux/list-packages.scm index f3e4ac2846..c4f445291b 100755 --- a/build-aux/list-packages.scm +++ b/build-aux/list-packages.scm @@ -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) |