packages: Remove redundant test for inputs-as-procedures.

* guix/packages.scm (package-derivation)[expand-input]: Remove redundant
  test when the input is a procedure.
This commit is contained in:
Ludovic Courtès 2013-01-22 00:14:04 +01:00
parent c6dbd50594
commit f153d89155
1 changed files with 1 additions and 5 deletions

View File

@ -280,11 +280,7 @@ PACKAGE for SYSTEM."
;; package, then `transitive-inputs' and co. would need to be
;; adjusted.
(let ((input (proc system)))
(if (or (string? input) (origin? input))
(expand-input (cons* name input sub-drv))
(raise (condition (&package-input-error
(package package)
(input i)))))))
(expand-input (cons* name input sub-drv))))
(x
(raise (condition (&package-input-error
(package package)