                                   (dom/span #js {:className (impl/itemclass (:status test-item-data))}
                                             (:name test-item-data))
                                   (dom/ul #js {:className "test-list"}
-                                          (mapv <test-result>
+                                          (mapv ui-test-result
                                                 (:test-results test-item-data)))
                                   (dom/ul #js {:className "test-list"}
-                                          (mapv (comp <test-item> #(assoc % :report/filter filter))
+                                          (mapv (comp ui-test-item #(assoc % :report/filter filter))
                                                 (:test-items test-item-data))))))))
 
-(def <test-item> (om/factory TestItem {:keyfn :id}))
+(def ui-test-item (om/factory TestItem {:keyfn :id}))
 
 (defui TestNamespace
        Object

                                           (if folded? \u25BA \u25BC)
                                           " Testing " (:name tests-by-namespace)))
                            (dom/ul #js {:className (if folded? "hidden" "test-list")}
                                    (mapv (comp <test-item> #(assoc % :report/filter filter))
                                          (:test-items tests-by-namespace))))))))

(def <test-namespace> (om/factory TestNamespace {:keyfn :name}))

(defui Filters
       Object

                                             (dom/div #js {:className (if folded? "hidden" "stack-trace")}
                                                      stack))))))))

(def ui-result-line (om/factory ResultLine))

(defui TestResult
       Object
       (render [this]
               (let [{:keys [message actual expected stack]} (om/props this)]
                 (->> (dom/tbody nil
                                 (ui-result-line {:title "Actual"
                                                 :value actual
                                                 :stack stack})
                                 (ui-result-line {:title "Expected"
                                                 :value (or expected "")}))
                      (dom/table nil)
                      (dom/div nil (when message (dom/h3 nil message)))
                      (dom/li nil)))))

(def ui-test-result (om/factory TestResult {:keyfn :id}))

(declare ui-test-item)

(defui TestItem
       Object
