diff options
| -rw-r--r-- | guix/build/utils.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/guix/build/utils.scm b/guix/build/utils.scm index a15beac114..dbfc0a9142 100644 --- a/guix/build/utils.scm +++ b/guix/build/utils.scm @@ -1303,6 +1303,9 @@ with definitions for VARS." (format #f "export ~a=\"$~a${~a:+:}~a\"" var var var (string-join rest ":"))))) + (when (wrapped-program? prog) + (error (string-append prog " is a wrapper. Refusing to wrap."))) + (if already-wrapped? ;; PROG is already a wrapper: add the new "export VAR=VALUE" lines just |