ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 13:49:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gexp: Slightly simplify 'gexp-inputs'.

Browse source 
* guix/gexp.scm (gexp-inputs)[add-reference-inputs]: Remove unneeded
'if' in the non-native nested gexp case.
This commit is contained in:
Ludovic Courtès 2016-12-19 17:13:21 +01:00
parent 5b14a7902c
commit d343a60f93
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
guix/gexp.scm
View file

@ -669,11 +669,8 @@ (define (add-reference-inputs ref result)
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)