From e86aac02f90edb4377926162b01a16c0b657ecf8 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Mon, 12 Apr 2021 10:35:41 +0200 Subject: [PATCH] Use pr-str in tasks --- src/babashka/impl/tasks.clj | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/babashka/impl/tasks.clj b/src/babashka/impl/tasks.clj index 9e9f2e65..8e34f66a 100644 --- a/src/babashka/impl/tasks.clj +++ b/src/babashka/impl/tasks.clj @@ -103,12 +103,15 @@ (map? task) (let [t (:task task)] (assemble-task-1 task-name t parallel? last? (:depends task))) - :else (let [prog (wrap-depends task depends)] + :else (let [task (pr-str task) + prog (wrap-depends task depends)] (wrap-def task-name prog parallel? last?))))) (defn format-task [init prog] (format " -(require '[babashka.tasks :refer [shell clojure]]) +(require '[babashka.tasks :as tasks]) +(def clojure tasks/clojure) +(def shell tasks/shell) %s %s" (str init)