Skip to content

Commit

Permalink
Merge pull request #4 from a13/master
Browse files Browse the repository at this point in the history
  • Loading branch information
licht1stein authored Apr 17, 2024
2 parents 1721f68 + 38a3f66 commit f9fdb7f
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 3 deletions.
7 changes: 5 additions & 2 deletions babashka.el
Original file line number Diff line number Diff line change
Expand Up @@ -106,9 +106,12 @@
"Convert TASKS to annotated alist."
(let (results)
(maphash (lambda (key value)
(let ((task-name (symbol-name key)))
(let ((task-name (symbol-name key))
(doc (if (hash-table-p value)
(gethash :doc value)
"")))
(unless (string-prefix-p ":" task-name)
(push (cons task-name (gethash :doc value))
(push (cons task-name doc)
results))))
tasks)
results))
Expand Down
2 changes: 1 addition & 1 deletion bb.edn
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@
:task (if *command-line-args*
(apply println "Hello," *command-line-args*)
(println "Hello, world!"))}

ls (shell "ls")
bye
{:doc "Goodbye world!"
:task (println "Goodbye, world!")}}}

0 comments on commit f9fdb7f

Please sign in to comment.