Add exit command to interactive task.
This commit is contained in:
parent
d446be077b
commit
69f8b7d6cd
1 changed files with 1 additions and 1 deletions
|
@ -15,7 +15,7 @@
|
|||
(flush)
|
||||
;; TODO: integrate with tab-completion in jLine
|
||||
(let [input (.readLine *in*)]
|
||||
(when input
|
||||
(when (and input (not= input "exit"))
|
||||
(let [[task-name & args] (string/split input #"\s")]
|
||||
(apply-task task-name project args not-found)
|
||||
(recur))))))
|
||||
|
|
Loading…
Reference in a new issue