Commit 0b3fdb88 authored by phil's avatar phil

improve

parent 4f5c189e
......@@ -15,7 +15,7 @@
(read-string (slurp (:config (:options @options)))))
(defn- sh* [cmd in]
(:out (apply sh (concat (split cmd #" ") [:in in]))))
(:out (sh "sh" "-c" cmd :in in)))
(defn handler [req]
(let [config (load-config)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment