timeline.cljs

gistfile1.txt

(defn- timeline-panel
  []
  (fn []
    (re/create-class
     {:component-did-mount (fn [comp]
                             (r/dispatch [:timeline/init (r-dom/dom-node comp) {}]))
      :reagent-render      (fn [_] [:div])})))

      (r/reg-event-fx

 :timeline/init
 (fn [{:keys [db]} [_ node opts]]
   (let [items-dataset  (new vis-data/DataSet (clj->js []))
         groups-dataset (new vis-data/DataSet (clj->js []))
         el             (new vis/Timeline
                             node
                             items-dataset
                             groups-dataset
                             (clj->js opts))]
     {:db (-> db
              (assoc-in [:timeline :datasets :items] items-dataset)
              (assoc-in [:timeline :datasets :groups] groups-dataset)
              (assoc-in [:timeline :el] el)
              ;; version is updated whenever some dataset is changed
              ;; in this way, datasets subscriptions will get notified
              (assoc-in [:timeline :version] 0))})))