update api

This commit is contained in:
2026-02-03 13:01:10 -05:00
parent 426a0c4715
commit ff842a5848
7 changed files with 10 additions and 10 deletions
+4 -4
View File
@@ -131,7 +131,7 @@
Options:
- :init - Initial model (required)
- :update - (fn [{:keys [model event]}] {:model m :events [...]}) (required)
- :view - (fn [model size] hiccup) where size is {:width w :height h} (required)
- :view - (fn [model] hiccup) (required)
- :init-events - Vector of events to dispatch at startup
- :fps - Target frames per second (default 60)
- :alt-screen - Use alternate screen buffer (default true)
@@ -162,7 +162,7 @@
(let [size (term/get-terminal-size)
ctx {:available-height (:height size)
:available-width (:width size)}]
(term/render! (render/render (view init size) ctx)))
(term/render! (render/render (view init) ctx)))
;; Main loop
(loop [model init
@@ -196,7 +196,7 @@
(execute-event! e msg-chan)))
;; Render with context for flex layouts
(term/render! (render/render (view new-model size) ctx))
(term/render! (render/render (view new-model) ctx))
(recur new-model now))))))
@@ -218,7 +218,7 @@
(defapp my-app
:init {:count 0}
:update (fn [{:keys [model event]}] ...)
:view (fn [model size] ...))"
:view (fn [model] ...))"
[name & {:keys [init update view init-events]}]
`(def ~name
{:init ~init