diff options
author | Pierre Neidhardt <mail@ambrevar.xyz> | 2021-01-20 20:37:57 +0100 |
---|---|---|
committer | Pierre Neidhardt <mail@ambrevar.xyz> | 2021-01-20 20:39:36 +0100 |
commit | 683154166d51c26c8f7248d2a0f2b37cf84d343a (patch) | |
tree | 5144a49e5378c711b8dd896ba3ef312f50ce6101 | |
parent | 2ec30608b2b9ffc0ca4d33c231052e0d73899837 (diff) | |
download | guix-683154166d51c26c8f7248d2a0f2b37cf84d343a.tar.gz |
gnu: lisp-repl-core-dumper: Patch path to `cat'.
* gnu/packages/lisp.scm (lisp-repl-core-dumper)[arguments]: Substitute calls to `cat' with full store path.
-rw-r--r-- | gnu/packages/lisp.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm index bdf9ac9d58..3c09b0af8a 100644 --- a/gnu/packages/lisp.scm +++ b/gnu/packages/lisp.scm @@ -1103,12 +1103,14 @@ assembler, PEG) is less than 1MB.") (add-before 'install 'fix-utils-path (lambda* (#:key inputs #:allow-other-keys) (let* ((coreutils (string-append (assoc-ref inputs "coreutils") "/bin/")) + (cat (string-append coreutils "cat")) (paste (string-append coreutils "paste")) (sort (string-append coreutils "sort")) (basename (string-append coreutils "basename")) (sed (string-append (assoc-ref inputs "sed") "/bin/sed"))) (substitute* "lisp-repl-core-dumper" (("\\$\\(basename") (string-append "$(" basename)) + (("\\<cat\\>") cat) (("\\<paste\\>") paste) (("\\<sed\\>") sed) (("\\<sort\\>") sort)))))))) |