luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix #1548: shell and sh should respect babashka.process/*defaults* (#1549)

Browse source
This commit is contained in:
Michiel Borkent 2023-04-28 13:30:07 +02:00 committed by GitHub
parent 0063196074
commit d27efb137d
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/babashka/impl/process.clj
View file

@ -20,6 +20,14 @@
(binding [process/*defaults* @defaults] (binding [process/*defaults* @defaults]
(apply process/pb args))) (apply process/pb args)))
(defn sh [& args]
(binding [process/*defaults* @defaults]
(apply process/sh args)))
(defn shell [& args]
(binding [process/*defaults* @defaults]
(apply process/shell args)))
(def process-namespace (def process-namespace
{'parse-args (copy-var process/parse-args tns) {'parse-args (copy-var process/parse-args tns)
'process* (copy-var process/process* tns) 'process* (copy-var process/process* tns)
@ -29,11 +37,11 @@
'start (copy-var process/start tns) 'start (copy-var process/start tns)
'pipeline (copy-var process/pipeline tns) 'pipeline (copy-var process/pipeline tns)
'$ (copy-var process/$ tns) '$ (copy-var process/$ tns)
'sh (copy-var process/sh tns) 'sh (copy-var sh tns)
'tokenize (copy-var process/tokenize tns) 'tokenize (copy-var process/tokenize tns)
'*defaults* defaults '*defaults* defaults
'destroy (copy-var process/destroy tns) 'destroy (copy-var process/destroy tns)
'destroy-tree (copy-var process/destroy-tree tns) 'destroy-tree (copy-var process/destroy-tree tns)
'exec (copy-var process/exec tns) 'exec (copy-var process/exec tns)
'shell (copy-var process/shell tns) 'shell (copy-var shell tns)
'alive? (copy-var process/alive? tns)}) 'alive? (copy-var process/alive? tns)})