This commit is contained in:
@@ -881,6 +881,9 @@
|
|||||||
:else
|
:else
|
||||||
background)))
|
background)))
|
||||||
|
|
||||||
|
(defn test-view-2 [& args]
|
||||||
|
[:box "foo"])
|
||||||
|
|
||||||
;; === Main ===
|
;; === Main ===
|
||||||
|
|
||||||
(defn -main [& _args]
|
(defn -main [& _args]
|
||||||
@@ -889,7 +892,7 @@
|
|||||||
(println (str "String with initial model: " (initial-model)))
|
(println (str "String with initial model: " (initial-model)))
|
||||||
(tui/run {:init (initial-model)
|
(tui/run {:init (initial-model)
|
||||||
:update update-model
|
:update update-model
|
||||||
:view view})
|
:view test-view-2})
|
||||||
(println "Goodbye!"))
|
(println "Goodbye!"))
|
||||||
(do
|
(do
|
||||||
(println "Error: Not a git repository")
|
(println "Error: Not a git repository")
|
||||||
|
|||||||
Reference in New Issue
Block a user