fix exit app
This commit is contained in:
@@ -103,6 +103,12 @@
|
||||
(.close r)
|
||||
(reset! tty-reader nil)))
|
||||
|
||||
(defn input-ready?
|
||||
"Check if input is available without blocking."
|
||||
[]
|
||||
(when-let [r @tty-reader]
|
||||
(.ready r)))
|
||||
|
||||
(defn read-char
|
||||
"Read a single character. Blocking."
|
||||
[]
|
||||
|
||||
Reference in New Issue
Block a user