Karma-coverage plugin support

honzabrecka · Jan 20, 2017 · 3bce565 · 3bce565
1 parent 79e2350
commit 3bce565
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 2 deletions.
diff --git a/project.clj b/project.clj
@@ -1,4 +1,4 @@
-(defproject karma-reporter "2.0.1"
+(defproject karma-reporter "2.1.0"
 
   :description "A plugin for running clojurescript tests with Karma."
 

diff --git a/src/jx/reporter/karma.cljs b/src/jx/reporter/karma.cljs
@@ -16,9 +16,20 @@
   (when (karma?)
     (.result @karma (clj->js m))))
 
+(defn- coverage-result []
+  (let [xform (comp
+                (map (partial re-find #"__cov_[^_]+$"))
+                (filter (comp not nil?))
+                (map (partial aget js/window))
+                (mapcat (juxt #(.-path %) identity))
+                (partition-all 2))
+        all-vars (.keys js/Object js/window)
+        coverage-info (into {} xform all-vars)]
+    (clj->js {:coverage coverage-info})))
+
 (defn- karma-complete! []
   (when (karma?)
-    (.complete @karma #js {})))
+    (.complete @karma (coverage-result))))
 
 (defn- now []
   (.getTime (js/Date.)))