            [:form.form-inline {:role "form"}
             [:div.col-md-5
              (om/build date-mover data {:opts {:div-id "date-mover" :k :start-date}
-                                        :init-state {:chevron-chan chevron-chan}})]
+                                        :init-state {:date-move-chan date-move-chan}})]
             [:div.col-md-5
              (om/build date-mover data {:opts {:div-id "date-mover" :k :end-date}
-                                        :init-state {:chevron-chan chevron-chan}})]]]])))))
+                                        :init-state {:date-move-chan date-move-chan}})]]]])))))

      (om/set-state! owner :start-date start-date)
      (om/set-state! owner :end-date end-date))
    om/IRenderState
    (render-state [_ {:keys [date-range-chan chevron-chan]}]
      (html
       (let [history (om/get-shared owner :history)]
         [:div

(defn date-mover [data owner {:keys [k]}]
  (reify
    om/IRenderState
    (render-state [_ {:keys [date-move-chan]}]
      (html
       [:div
        [:table.table.borderless {:style {:font-size "90%"}}
         [:tbody
          [:tr
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :day-plus :k k}))} "+1 Day"]
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :week-plus :k k}))} "+1 Week"]
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :month-plus :k k}))} "+1 Month"]]
          [:tr
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :day-minus :k k}))} "-1 Day"]
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :week-minus :k k}))} "-1 Week"]
           [:td.datemover {:on-click (fn [_] (put! date-move-chan {:event :month-minus :k k}))} "-1 Month"]]]]]))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Date-time picker
