diff --git a/gnu/packages/docker.scm b/gnu/packages/docker.scm index 44f902b3ad..847871a95f 100644 --- a/gnu/packages/docker.scm +++ b/gnu/packages/docker.scm @@ -372,7 +372,7 @@ (define-public docker ((substitute-LookPath source-text package relative-path) #`(substitute* source-files - ((#,(string-append "exec\\.LookPath\\(\"" + ((#,(string-append "\\datum #'source-text) "\")")) @@ -386,11 +386,12 @@ (define-public docker ((substitute-LookPath source-text package relative-path) #`(substitute* source-files - ((#,(string-append "exec\\.Command\\(\"" + ((#,(string-append "\\<(re)?exec\\.Command\\(\"" (syntax->datum #'source-text) - "\"")) - (string-append "exec.Command(\"" + "\"") _ re?) + (string-append (if re? re? "") + "exec.Command(\"" (assoc-ref inputs package) relative-path "\""))))))))