aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/lisp.scm
diff options
context:
space:
mode:
authorPierre Neidhardt <mail@ambrevar.xyz>2021-01-20 20:37:57 +0100
committerPierre Neidhardt <mail@ambrevar.xyz>2021-01-20 20:39:36 +0100
commit683154166d51c26c8f7248d2a0f2b37cf84d343a (patch)
tree5144a49e5378c711b8dd896ba3ef312f50ce6101 /gnu/packages/lisp.scm
parent2ec30608b2b9ffc0ca4d33c231052e0d73899837 (diff)
downloadguix-683154166d51c26c8f7248d2a0f2b37cf84d343a.tar
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.
Diffstat (limited to 'gnu/packages/lisp.scm')
-rw-r--r--gnu/packages/lisp.scm2
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))))))))