 (defn series-pane [ series ]
   [:div.series-pane
    [:div.series-pane-header
-    [:span.series-name (:name series)]]
+    [:span.series-name series]]
    [series-tsplot series]])
 
 (defn series-list [ ]
   [:div
    (for [ series (:series @dashboard-state) ]
-     ^{ :key (:name series) } [series-pane series])])
+     ^{ :key series } [series-pane series])])
 
 (defn end-edit [ text state ]
   (let [ qws (js/parseInt text) ]

      (fn [ this ]
        (swap! series-state assoc :dom-node (.-parentNode (reagent/dom-node this)))
        (go
          (swap! series-state assoc :series-data (<! (<<< fetch-series-data (:name series) @query-window-secs)))))

      :reagent-render
      (fn [ ]

  (.addEventListener js/window "resize" on-window-resize)
  (on-window-resize nil)
  (go
    (swap! dashboard-state assoc :series (<! (<<< fetch-series-names)))))

(run)
