summaryrefslogtreecommitdiff
path: root/test/clarktown/parsers/heading_block_test.clj
diff options
context:
space:
mode:
authorAsko Nõmm <asko@bien.ee>2022-04-19 17:50:19 +0300
committerAsko Nõmm <asko@bien.ee>2022-04-19 17:50:19 +0300
commit52203a49aa544b2c11c96445d8732893160c436b (patch)
tree84d7b0e9af92770647643bdf7ddbb898663bd7b8 /test/clarktown/parsers/heading_block_test.clj
parent059bfa7bd9bfdde0c75646bf1dfc20d23da8a02c (diff)
WIP #16
Pretty much done. Needs more testing. And new documentation.
Diffstat (limited to 'test/clarktown/parsers/heading_block_test.clj')
-rw-r--r--test/clarktown/parsers/heading_block_test.clj44
1 files changed, 0 insertions, 44 deletions
diff --git a/test/clarktown/parsers/heading_block_test.clj b/test/clarktown/parsers/heading_block_test.clj
deleted file mode 100644
index 9bfff4f..0000000
--- a/test/clarktown/parsers/heading_block_test.clj
+++ /dev/null
@@ -1,44 +0,0 @@
-(ns clarktown.parsers.heading-block-test
- (:require
- [clojure.test :refer [deftest testing is]]
- [clarktown.parsers.heading-block :as heading-block]))
-
-
-(deftest hashbang-heading-test
- (testing "Hashbang heading block that's a H1"
- (is (= "<h1>This is a heading block.</h1>"
- (heading-block/render "# This is a heading block." nil))))
-
- (testing "Hashbang heading block that's a H2"
- (is (= "<h2>This is a heading block.</h2>"
- (heading-block/render "## This is a heading block." nil))))
-
- (testing "Hashbang heading block that's a H3"
- (is (= "<h3>This is a heading block.</h3>"
- (heading-block/render "### This is a heading block." nil))))
-
- (testing "Hashbang heading block that's a H4"
- (is (= "<h4>This is a heading block.</h4>"
- (heading-block/render "#### This is a heading block." nil))))
-
- (testing "Hashbang heading block that's a H5"
- (is (= "<h5>This is a heading block.</h5>"
- (heading-block/render "##### This is a heading block." nil)))))
-
-
-(deftest settext-heading-text
- (testing "Settext heading block that's a H1"
- (is (= "<h1>This is a heading block.</h1>"
- (heading-block/render "This is a heading block.\n=========" nil))))
-
- (testing "Settext heading block that's a H1 spanning multiple lines"
- (is (= "<h1>This is a \nheading block spanning multiple lines.</h1>"
- (heading-block/render "This is a \nheading block spanning multiple lines.\n========" nil))))
-
- (testing "Settext heading block that's a H2"
- (is (= "<h2>This is a heading block.</h2>"
- (heading-block/render "This is a heading block.\n---------" nil))))
-
- (testing "Settext heading block that's a H2 spanning multiple lines"
- (is (= "<h2>This is a \nheading block spanning multiple lines.</h2>"
- (heading-block/render "This is a \nheading block spanning multiple lines.\n--------" nil))))) \ No newline at end of file