1 files changed, 11 insertions, 0 deletions
diff --git a/test/dompa/round_trip_test.clj b/test/dompa/round_trip_test.clj
new file mode 100644
index 0000000..0e5d1fa
--- /dev/null
+++ b/test/dompa/round_trip_test.clj
@@ -0,0 +1,11 @@
+(ns dompa.round-trip-test
+  (:require [clojure.test :refer [deftest is testing]]
+            [dompa.nodes :as nodes]
+            [dompa.html :as html]))
+
+(deftest round-trip-test
+  (testing "michiel borkent website"
+    (let [input-html (slurp "test/dompa/html/michiel_borkent.html")
+          nodes      (html/->nodes input-html)
+          output-html (nodes/->html nodes)]
+      (is (= input-html output-html)))))
+\ No newline at end of file