iyzsong pushed a commit to branch master
in repository guix.
commit eeae0b3c6ca1a0b86cb015ed45c638985ed7da30
Author: 宋文武 <[email protected]>
Date: Wed May 27 21:03:21 2015 +0800
profiles: Use 'derivation?' to filter hooks.
Fixes a regression introduced in 07eaecfa.
* guix/profiles.scm (profile-derivation): Use 'derivation?' instead of
'gexp?' to filter hooks.
---
guix/profiles.scm | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/guix/profiles.scm b/guix/profiles.scm
index 55c0598..aaf6933 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -685,9 +685,9 @@ the monadic procedures listed in HOOKS--such as an Info
'dir' file, etc."
(hook manifest))
hooks)))))
(define inputs
- (append (filter-map (lambda (gexp)
- (and (gexp? gexp)
- (gexp-input gexp)))
+ (append (filter-map (lambda (drv)
+ (and (derivation? drv)
+ (gexp-input drv)))
extras)
(manifest-inputs manifest)))
