rename
This commit is contained in:
parent
da2b5d94b2
commit
0fb68755fe
|
@ -14,7 +14,7 @@
|
||||||
(defn toggle-element [elem]
|
(defn toggle-element [elem]
|
||||||
(dom/toggle-attr! elem :disabled (not (dom/attr elem :disabled))))
|
(dom/toggle-attr! elem :disabled (not (dom/attr elem :disabled))))
|
||||||
|
|
||||||
(def handler
|
(def event-handlers
|
||||||
{:on-open
|
{:on-open
|
||||||
(fn []
|
(fn []
|
||||||
(let [msg-input (by-id "msg-input")
|
(let [msg-input (by-id "msg-input")
|
||||||
|
@ -43,4 +43,4 @@
|
||||||
(dom/set-text! (str "MSG::" msg))))))})
|
(dom/set-text! (str "MSG::" msg))))))})
|
||||||
|
|
||||||
(defn ^:export run []
|
(defn ^:export run []
|
||||||
(browserchannel/init! handler))
|
(browserchannel/init! event-handlers))
|
Reference in a new issue