[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/05: pull: Remove unused procedures.
From: |
guix-commits |
Subject: |
02/05: pull: Remove unused procedures. |
Date: |
Wed, 17 Jul 2019 18:44:30 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit c84c4c1db76e248c7709b1b5421f7539134d8cdb
Author: Ludovic Courtès <address@hidden>
Date: Wed Jul 17 20:09:24 2019 +0200
pull: Remove unused procedures.
* guix/scripts/pull.scm (what-to-build, indirect-root-added): Remove.
---
guix/scripts/pull.scm | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/guix/scripts/pull.scm b/guix/scripts/pull.scm
index 7895c19..b074209 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 _ ...)