Improve test coverage

1 files changed, 16 insertions, 1 deletions

diff --git a/test/dompa/html_test.cljc b/test/dompa/html_test.cljc
index ab2fafd..8565fdc 100644
--- a/test/dompa/html_test.cljc
+++ b/test/dompa/html_test.cljc
@@ -1,2 +1,17 @@
 (ns dompa.html-test
-  (:require [clojure.test :refer [deftest is testing]]))
+  (:require [clojure.test :refer [deftest is testing]]
+            [dompa.html :as html]))
+
+(deftest coordinates-test
+  (testing "HTML to coordinates"
+    (is (=  [[0 15]
+             [5 9]]
+           (html/->coordinates "<div>hello</div>")))))
+
+(deftest nodes-test
+  (testing "HTML to nodes"
+    (is (= [{:node/name :div
+             :node/attrs    {}
+             :node/children [{:node/name  :dompa/text
+                              :node/value "hello"}]}]
+           (html/->nodes "<div>hello</div>")))))