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

fix help

Browse source
This commit is contained in:
Michiel Borkent 2021-03-26 12:07:58 +01:00
parent c53a0b079b
commit 5c6bbb4b0f
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/babashka/main.clj
View file

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