civodul pushed a commit to branch master
in repository guix-artwork.
commit d30d57c315d1f2ad5ae4db775359a988b4038819
Author: Ludovic Courtès <[email protected]>
Date: Tue Aug 29 00:11:30 2017 +0200
website: packages: Correctly compute supported systems.
* website/apps/packages/templates/components.scm (supported-systems->shtml):
Fix computation of 'systems'.
---
website/apps/packages/templates/components.scm | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/website/apps/packages/templates/components.scm
b/website/apps/packages/templates/components.scm
index 5224ba2..33a9941 100644
--- a/website/apps/packages/templates/components.scm
+++ b/website/apps/packages/templates/components.scm
@@ -14,6 +14,7 @@
#:use-module (guix licenses)
#:use-module (guix packages)
#:use-module (guix gnu-maintenance)
+ #:use-module (srfi srfi-1)
#:export (detailed-package-preview
issue-count->shtml
lint-issue->shtml
@@ -209,7 +210,10 @@
(package-id (string-append (package-name package)
"-"
(package-version package)))
- (systems (package-supported-systems package)))
+ (systems (lset-intersection
+ string=?
+ %hydra-supported-systems
+ (package-transitive-supported-systems package))))
(if (null? systems)
"None"
(separate
