 
 (defonce query-window (reagent/atom "1d"))
 
-(def dashboard-state (reagent/atom {:series [] :text ""}))
+(defonce dashboard-state (reagent/atom {:series [] :text ""}))
 
-(def window-width (reagent/atom nil))
+(defonce window-width (reagent/atom nil))
 
 (defn <<< [f & args]
   (let [c (chan)]

      (recur))
    channel))

(defn series-tsplot [ series qws-arg ]
  (let [dom-node (reagent/atom nil)
        series-state (reagent/atom {})]

      :component-did-mount
      (fn [ this ]
        (reset! dom-node (reagent/dom-node this))
        (subscribe-plot-data series series-state))
      
      :reagent-render
      (fn [ & rest ]
