           (bind-attr! node k v state))
         (when children
           (append-children! node children))
-        (when-let [m (-meta virtual-dom)]
+        (when-let [m (meta virtual-dom)]
           (when-let [node-created (get m :node-created)]
             (node-created node)))
         node))))

        state (ElementState. node-id false element-spec nil)]
    (set! auto-node-id (inc auto-node-id))
    (set-attr! dom-node "data-freactive-id" node-id)
    (when-let [m (-meta element-spec)]
      (when-let [on-disposed (get m :node-disposed)]
        (set! (.-disposed-callback state) on-disposed)))
    (aset element-state-lookup node-id state)


(defn- register-element-with-parent [parent new-elem]
  (when-not (text-node? new-elem)
    (let [parent-state (get-element-state parent)
          parent-state (or parent-state
                           (init-element-state! parent 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)))))
