summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-07-17 20:09:24 +0200
committerLudovic Courtès <ludo@gnu.org>2019-07-18 00:44:23 +0200
commitc84c4c1db76e248c7709b1b5421f7539134d8cdb (patch)
tree8d70af8e205342c54291eb7bfd9a7f1ffc72479b
parent4569a7693eded1d62c65c5a8042bd34e24636f28 (diff)
pull: Remove unused procedures.
* guix/scripts/pull.scm (what-to-build, indirect-root-added): Remove.
-rw-r--r--guix/scripts/pull.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/guix/scripts/pull.scm b/guix/scripts/pull.scm
index 7895c19914..b07420939b 100644
--- a/guix/scripts/pull.scm
+++ b/guix/scripts/pull.scm
@@ -162,16 +162,11 @@ Download and deploy the latest version of Guix.\n"))
%standard-build-options))
-(define what-to-build
- (store-lift show-what-to-build))
-(define indirect-root-added
- (store-lift add-indirect-root))
-
(define* (display-profile-news profile #:key concise?
current-is-newer?)
"Display what's up in PROFILE--new packages, and all that. If
CURRENT-IS-NEWER? is true, assume that the current process represents the
-newest generation of PROFILE.x"
+newest generation of PROFILE."
(match (memv (generation-number profile)
(reverse (profile-generations profile)))
((current previous _ ...)