From 8c73a02915047e9f5bf8b9f66cfb60fe94b536bb Mon Sep 17 00:00:00 2001
From: Michiel Borkent <michielborkent@gmail.com>
Date: Mon, 19 Oct 2020 23:46:21 +0200
Subject: [PATCH] [babashka/process#2] *escape-fn*

---
 process                       |  2 +-
 src/babashka/impl/process.clj | 21 ++++++++++++++++-----
 2 files changed, 17 insertions(+), 6 deletions(-)

diff --git a/process b/process
index 148ecb18..d7eb4f67 160000
--- a/process
+++ b/process
@@ -1 +1 @@
-Subproject commit 148ecb18fdba9cf8e158bec213c96d1ac197b6a4
+Subproject commit d7eb4f67b29916e98df0e303f5f0dc38a4769a9f
diff --git a/src/babashka/impl/process.clj b/src/babashka/impl/process.clj
index 06457a39..3576e98c 100644
--- a/src/babashka/impl/process.clj
+++ b/src/babashka/impl/process.clj
@@ -5,9 +5,20 @@
 
 (def tns (sci/create-ns 'babashka.process nil))
 
+(def escape-fn (sci/copy-var process/*escape-fn* tns))
+
+(defn process [& args]
+  (binding [process/*escape-fn* @escape-fn]
+    (apply process/process args)))
+
+(defn pb [& args]
+  (binding [process/*escape-fn* @escape-fn]
+    (apply process/pb args)))
+
 (def process-namespace
-  {'process  (copy-var process/process tns)
-   'check    (copy-var process/check tns)
-   'pb       (copy-var process/pb tns)
-   'pipeline (copy-var process/pipeline tns)
-   '$        (copy-var process/$ tns)})
+  {'process     (copy-var process tns)
+   'check       (copy-var process/check tns)
+   'pb          (copy-var pb tns)
+   'pipeline    (copy-var process/pipeline tns)
+   '$           (copy-var process/$ tns)
+   '*escape-fn* escape-fn})