packages: 'generate-package-cache' uses 'supported-package?'.

* gnu/packages.scm (generate-package-cache): Use 'supported-package?'
instead of 'package-supported-systems'.
This commit is contained in:
Ludovic Courtès 2019-09-06 14:39:54 +02:00
parent 25bdbb618a
commit d2d63e20d5
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -393,9 +393,7 @@ (define (expand-cache module symbol variable result+seen)
,(module-name module) ,(module-name module)
,symbol ,symbol
,(package-outputs package) ,(package-outputs package)
,(->bool ,(->bool (supported-package? package))
(member (%current-system)
(package-supported-systems package)))
,(->bool (package-superseded package)) ,(->bool (package-superseded package))
,@(let ((loc (package-location package))) ,@(let ((loc (package-location package)))
(if loc (if loc