This commit is contained in:
Michiel Borkent 2021-03-26 12:19:37 +01:00
parent 3b39ccfe1d
commit 518e430930

View file

@ -152,11 +152,12 @@ Use -- to separate script command line args from bb command line args.
(let [k (first command-line-args)
k (keyword (subs k 1))
task (get-in @bb-edn [:tasks k])
{:keys [:task :args]} (decode-task task)
{:keys [:args]
task-key :task} (decode-task task)
help-text (:help (meta task))]
(if help-text
[(println help-text) 0]
(if-let [main (when (= :main task)
(if-let [main (when (= :main task-key)
(first args))]
(let [main (if (simple-symbol? main)
(symbol (str main) "-main")