From f153d891550986f72a6e10f48cd68fd558569815 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Tue, 22 Jan 2013 00:14:04 +0100 Subject: packages: Remove redundant test for inputs-as-procedures. * guix/packages.scm (package-derivation)[expand-input]: Remove redundant test when the input is a procedure. --- guix/packages.scm | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/guix/packages.scm b/guix/packages.scm index da8f45af5e..a9534adfec 100644 --- a/guix/packages.scm +++ b/guix/packages.scm @@ -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) -- cgit v1.2.3