summaryrefslogtreecommitdiff
path: root/guix/scripts/gc.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-06-20 23:51:00 +0200
committerLudovic Courtès <ludo@gnu.org>2013-06-20 23:51:00 +0200
commitd501fad11cfbd69245a4d5e2d632a0ab37985b55 (patch)
tree4d5a347efb3a5476937b21cb5bdb26204aaeea0c /guix/scripts/gc.scm
parent4db00e42109b6f8229259859deac35499eec9004 (diff)
parentf3211ef3868326e3cec5318bc799a2ff6572741b (diff)
downloadguix-patches-d501fad11cfbd69245a4d5e2d632a0ab37985b55.tar
guix-patches-d501fad11cfbd69245a4d5e2d632a0ab37985b55.tar.gz
Merge branch 'master' into core-updates
Conflicts: gnu/packages/make-bootstrap.scm
Diffstat (limited to 'guix/scripts/gc.scm')
-rw-r--r--guix/scripts/gc.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/guix/scripts/gc.scm b/guix/scripts/gc.scm
index cecb68ec36..77ec7635de 100644
--- a/guix/scripts/gc.scm
+++ b/guix/scripts/gc.scm
@@ -51,6 +51,8 @@ Invoke the garbage collector.\n"))
(display (_ "
--references list the references of PATHS"))
(display (_ "
+ -R, --requisites list the requisites of PATHS"))
+ (display (_ "
--referrers list the referrers of PATHS"))
(newline)
(display (_ "
@@ -128,6 +130,10 @@ interpreted."
(lambda (opt name arg result)
(alist-cons 'action 'list-references
(alist-delete 'action result))))
+ (option '(#\R "requisites") #f #f
+ (lambda (opt name arg result)
+ (alist-cons 'action 'list-requisites
+ (alist-delete 'action result))))
(option '("referrers") #f #f
(lambda (opt name arg result)
(alist-cons 'action 'list-referrers
@@ -189,6 +195,8 @@ interpreted."
(delete-paths store paths))
((list-references)
(list-relatives references))
+ ((list-requisites)
+ (list-relatives requisites))
((list-referrers)
(list-relatives referrers))
((list-dead)