   (when (.-getAttribute dom-node)
     (.getAttribute dom-node attr-name)))
 
-(defn- get-node-id [x]
-  (get-attr x "data-freactive-id"))
+;; (defn- get-node-id [x]
+;;   (get-attr x "data-freactive-id")
+;;   )
 
 (defn- get-element-state [x]
   ;;(get element-state-lookup x)

                           (init-element-state! parent nil nil))]
      (let [state (get-element-state new-elem)]
        (set! (.-parent-state state) parent-state)
        (register-with-parent-state parent-state
                                    (get-node-id new-elem) state)
        state))))

(defn- get-state-attr [state attr-str]

       (when-let [child-states (.-child-states parent-state)]
         (js-delete child-states node-id)))))
  ([child-key state]
   (println "disposing" child-key)
   (when state
     (set! (.-disposed state) true)
     (when-let [disposed-callback (.-disposed-callback state)]
