blob: 55493e0ef21b3c89735dbe99402b7cadaae2db2b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(ns clarktown.renderers.strikethrough-test
(:require
[clojure.test :refer [deftest testing is]]
[clarktown.renderers.strikethrough :as strikethrough]))
(deftest strikethrough-renderer-test
(testing "Creating strikethrough text"
(is (= (strikethrough/render "~~This is strikethrough text.~~" nil)
"<del>This is strikethrough text.</del>")))
(testing "Creating strikethrough text mixed with regular text"
(is (= (strikethrough/render "Some other text, ~~This is strikethrough text.~~ And more text." nil)
"Some other text, <del>This is strikethrough text.</del> And more text."))))
|
