                   (om/update-state! owner #(assoc % :continue? false))
                   (om/update-state! owner #(assoc % :svg nil))
                   ))
-  )+  )


(defcomponent parsets [cursor owner {:keys [agg width height] :or {width 1000 height 600} :as opts}]
  (init-state [_]
              {:width width :height height
               :continue? true
               :comm (chan)
               :parsets-agg (map keyword (:terms agg))
               :svg nil})

             [:span.card-title.black-text "# PARSETS"]
             [:div {:id "parsets"}]]]))
  (did-mount [_]
             (let [{:keys [comm parsets-agg]} (om/get-state owner)
                   svg (new-svg "#parsets" width height)
                   chart (-> js/d3
                              .parsets
