(ns rf-todo-list.views
  (:require
    [reagent.core :as re-agent]
    [re-frame.core :as re-frame]
    [rf-todo-list.subs]                                     ; call reframe subscription
    ))

(defn main-panel []
  (let [todo-list @(re-frame/subscribe [:todo-list-load :todo-list-save])
        text (re-agent/atom "")]
    [:div
...
     [:div
      [:input {:name      "description"
               :type      "text"
               :value     @text
               :on-change (fn [event]
                            (println (-> event .-target .-value))
                            (reset! text (-> event .-target .-value)))
               }]
...
      ]]))