 (defmulti attach-data (fn [node d] (node-type node)))
 (defmethod attach-data :chiccup [node d]
   (assoc-in node [:attr (str "data-" node-data-key)]
-              (binding [*print-dup* true] (pr-str d))))
+            (binding [*print-dup* true] (pr-str d))))
 
 (defmethod attach-data :dom [node d]
   (attr node (str "data-" node-data-key)

                (if (not= d (:datum old))
                  (if (update d idx (:node old) new-node)
                    (merge-dom! (:node old) new-node
                                
                                ;;don't use requestAnimationFrame until we can figure out how to get it playing nicely with automated tests.
                                ;;:defer-attr true
                                ))))

            (if (exit datum idx node)
              (gdom/removeNode node))))


    ;;For each datum, update existing nodes and add new ones
    (iter {for [idx d] in (map-indexed vector data)}
          (let [new-node (attach-data (cannonicalize (mapping d idx)) d)]
