summaryrefslogtreecommitdiff
path: root/test/clarktown/parsers/horizontal_line_block_test.clj
diff options
context:
space:
mode:
authorAsko Nomm <asko@bien.ee>2022-04-10 14:23:43 +0200
committerAsko Nomm <asko@bien.ee>2022-04-10 14:23:43 +0200
commite79fcd4c45dbf1eb6e8ec79725fbe3c55f8b2c7d (patch)
treea01106b853bcbbc9ced53b164698d3be56b9608f /test/clarktown/parsers/horizontal_line_block_test.clj
parentd4fd8d01eb9b57f1ee7b770ca24fc5e121b49edc (diff)
Re #4: Add full test coverage for quote blocks.
Diffstat (limited to 'test/clarktown/parsers/horizontal_line_block_test.clj')
-rw-r--r--test/clarktown/parsers/horizontal_line_block_test.clj7
1 files changed, 6 insertions, 1 deletions
diff --git a/test/clarktown/parsers/horizontal_line_block_test.clj b/test/clarktown/parsers/horizontal_line_block_test.clj
index c8c0e90..56601e2 100644
--- a/test/clarktown/parsers/horizontal_line_block_test.clj
+++ b/test/clarktown/parsers/horizontal_line_block_test.clj
@@ -7,4 +7,9 @@
(deftest horizontal-line-block-test
(testing "Creating a horizontal line"
(is (= "<hr>"
- (horizontal-line-block/render "***" nil))))) \ No newline at end of file
+ (horizontal-line-block/render "***" nil))))
+
+ (testing "Is a horizontal line block"
+ (is (true? (horizontal-line-block/is? "***")))
+ (is (true? (horizontal-line-block/is? " ***")))
+ (is (false? (horizontal-line-block/is? "Test *** 123"))))) \ No newline at end of file