jmd pushed a commit to branch wip-installer
in repository guix.
commit e84beba55b600e7fd1431c6a3c20db31368dbf34
Author: Ludovic Courtès <[email protected]>
Date: Mon Dec 19 17:13:21 2016 +0100
gexp: Slightly simplify 'gexp-inputs'.
* guix/gexp.scm (gexp-inputs)[add-reference-inputs]: Remove unneeded
'if' in the non-native nested gexp case.
---
guix/gexp.scm | 7 ++-----
1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/guix/gexp.scm b/guix/gexp.scm
index 5021688..6f63afe 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -669,11 +669,8 @@ references; otherwise, return only non-native references."
result)
result))
(($ <gexp-input> (? gexp? exp) _ #f)
- (if native?
- (append (gexp-inputs exp #:native? #t)
- result)
- (append (gexp-inputs exp)
- result)))
+ (append (gexp-inputs exp #:native? native?)
+ result))
(($ <gexp-input> (? string? str))
(if (direct-store-path? str)
(cons `(,str) result)
