 (def dashboard-state (reagent/atom {:series [] :text ""}))
 
 (def window-width (reagent/atom nil))
-
-(def default-tsplot-width 1024)
-(def default-tsplot-height 180)
 
 (defn <<< [f & args]
   (let [c (chan)]

  (reagent/render [dashboard]
                  (js/document.getElementById "metlog"))
  (.addEventListener js/window "resize" on-window-resize)
  (on-window-resize nil)
  (go
    (swap! dashboard-state assoc :series (<! (<<< fetch-series-names)))))


            {:query-window-secs query-window-secs}
            cb))

(defn tsplot-draw [ canvas series-data ]
  (let [ ctx (.getContext canvas "2d")]
    (tsplot/draw ctx (.-clientWidth canvas) (.-clientHeight canvas) series-data)))

(defn series-tsplot [ series ]
  (let [dom-node (reagent/atom nil)
