summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-07-10 18:51:56 +0200
committerLudovic Courtès <ludo@gnu.org>2019-07-15 10:01:05 +0200
commit9af75a26308475f5fc9cf1c13bb0374b5a3345a6 (patch)
tree5897b4d5590a365467e89f660a19c41a154db17f /guix
parentb9373e262730578ba6c3805ffe44900f10bc655c (diff)
channels: Avoid use of 'derivation-input-path'.
* guix/channels.scm (old-style-guix?): Use 'derivation-name' rather than 'derivation-input-path'.
Diffstat (limited to 'guix')
-rw-r--r--guix/channels.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/channels.scm b/guix/channels.scm
index 615ff14565..bfe6963418 100644
--- a/guix/channels.scm
+++ b/guix/channels.scm
@@ -435,8 +435,9 @@ derivation."
;; "old style" (before commit 8a0d9bc8a3f153159d9e239a151c0fa98f1e12d8,
;; dated May 30, 2018) did not depend on "guix-command.drv".
(not (find (lambda (input)
- (string-suffix? "-guix-command.drv"
- (derivation-input-path input)))
+ (string=? "guix-command"
+ (derivation-name
+ (derivation-input-derivation input))))
(derivation-inputs drv))))
(define (channel-instances->manifest instances)