         (.log js/console "nodes" (pr-str nodes))
         (swap! app-state assoc node-key nodes)
 		(swap! app-state assoc :nodes (merge (:old-nodes @app-state) (:new-nodes @app-state)))
+		(draw-map canvas-dom (:map @app-state))
     )
 )
 

       (send (str "http://" (cljs-env :es-host "localhost") ":9200/" log "/_search") "POST" payload))
	   ))

(defn parse-nodes [node-data node-key]
    (let [
        buckets (-> node-data :aggregations :group_by_state :buckets)

(om/root sensors-view app-state
  {:target (. js/document (getElementById "sensors"))})

(defn map-image []
	(let [img (js/Image.)]
		(set! (.-src img) "map.png")
