           filter (:report/filter tests-by-namespace)
           {:keys [folded?]} (om/get-state this)]
       (dom/li #js {:className "test-item"}
-              (dom/div #js {:className "test-namespace"}
-                       (dom/a #js {:href "javascript:void(0)"
-                                   :style #js {:textDecoration "none"} ;; TODO: refactor to css
-                                   :onClick   #(om/update-state! this update :folded? not)}
-                              (dom/h2 #js {:className (impl/itemclass (:status tests-by-namespace))}
-                                      (if folded? \u25BA \u25BC)
-                                      " Testing " (:name tests-by-namespace)))
-                       (dom/ul #js {:className (if folded? "hidden" "test-list")}
-                               (mapv (comp ui-test-item #(assoc % :report/filter filter))
-                                     (:test-items tests-by-namespace))))))))
+        (dom/div #js {:className "test-namespace"}
+          (dom/a #js {:href "javascript:void(0)"
+                      :style #js {:textDecoration "none"} ;; TODO: refactor to css
+                      :onClick   #(om/update-state! this update :folded? not)}
+            (dom/h2 #js {:className (impl/itemclass (:status tests-by-namespace))}
+              (if folded? \u25BA \u25BC)
+              " Testing " (:name tests-by-namespace)))
+          (dom/ul #js {:className (if folded? "hidden" "test-list")}
+            (mapv (comp ui-test-item #(assoc % :report/filter filter))
+              (:test-items tests-by-namespace))))))))
 (def ui-test-namespace (om/factory TestNamespace {:keyfn :name}))
 
 (defui FilterSelector

          {:keys [render]} (om/props this)
          {:keys [title value classes]} (render folded?)]
      (dom/div nil
               (dom/a #js {:href "javascript:void(0);"
                           :className classes
                           :onClick #(om/update-state! this update :folded? not)}
                      (if folded? \u25BA \u25BC)
                      (if folded?
                        (str (apply str (take 40 title))
                             (when (< 40 (count title)) "..."))
                        (str title)))
               (dom/div #js {:className (when folded? "hidden")}
                        value)))))
(def ui-foldable (om/factory Foldable {:keyfn (let [c (atom 0)]
                                                #(str "foldable-" (swap! c inc)))}))


    (let [d (om/props this)
          {:keys [exp got path]} (diff/extract d)]
      (dom/table #js {:className "human-diff-lines"}
        (dom/tbody nil
          (when (seq path)
            (dom/tr #js {:className "path"}
              (dom/td nil "at: ")
              (dom/td nil (str path))))
          (dom/tr #js {:className "expected"}
            (dom/td nil "exp: ")
            (dom/td nil (html-edn exp)))
          (dom/tr #js {:className "actual"}
            (dom/td nil "got: ")
            (dom/td nil (html-edn got))))))))
(def ui-human-diff-lines (om/factory HumanDiffLines {:keyfn (let [c (atom 0)]
                                                              #(swap! c inc))}))

