diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-07-28 18:50:43 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-07-28 18:50:43 +0200 |
commit | 6980511b7391e65a307689f90e4ef5c1979e4541 (patch) | |
tree | 72f54adfe4e0187845882fb88cfa80c275424d9a /gnu/packages.scm | |
parent | cb55f9c652105d9ed4fc46cb902f0935fe7e35f8 (diff) | |
download | gnu-guix-6980511b7391e65a307689f90e4ef5c1979e4541.tar gnu-guix-6980511b7391e65a307689f90e4ef5c1979e4541.tar.gz |
packages: Add 'hidden-package'.
* guix/packages.scm (hidden-package, hidden-package?): New procedures.
* gnu/packages.scm (fold-packages): Filter out 'hidden-package?'.
* tests/packages.scm ("hidden-package"): New test.
Diffstat (limited to 'gnu/packages.scm')
-rw-r--r-- | gnu/packages.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/packages.scm b/gnu/packages.scm index 9496a270eb..68a9eef2ad 100644 --- a/gnu/packages.scm +++ b/gnu/packages.scm @@ -200,7 +200,8 @@ same package twice." (fold2 (lambda (module result seen) (fold2 (lambda (var result seen) (if (and (package? var) - (not (vhash-assq var seen))) + (not (vhash-assq var seen)) + (not (hidden-package? var))) (values (proc var result) (vhash-consq var #t seen)) (values result seen))) |