1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-07 21:50:35 +02:00

packages: 'fold-available-packages' uses 'supported-package?'.

Fixes <https://bugs.gnu.org/37748>.
Reported by Marius Bakke <mbakke@fastmail.com>.

This is a followup to d2d63e20d5.

* gnu/packages.scm (fold-available-packages): Use 'supported-package?'
instead of (member ... (package-supported-systems ...)) to match what
'generate-package-cache' does.
This commit is contained in:
Ludovic Courtès
2019-10-14 23:41:24 +02:00
parent 914379a503
commit 88da011592

View File

@@ -228,9 +228,7 @@ package module."
#:outputs (package-outputs package)
#:location (package-location package)
#:supported?
(->bool
(member (%current-system)
(package-supported-systems package)))
(->bool (supported-package? package))
#:deprecated?
(->bool
(package-superseded package))))