test/clarktown/renderers/bold_test.clj


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

(ns clarktown.renderers.bold-test
  (:require
    [clojure.test :refer [deftest testing is]]
    [clarktown.renderers.bold :as bold]))


(deftest bold-renderer-test
  (testing "Creating bold text with two surrounding asterisk characters"
    (is (= "<strong>This is bold.</strong>"
           (bold/render "**This is bold.**" nil))))

  (testing "Creating bold text with two surrounding underscore characters"
    (is (= "<strong>This is bold.</strong>"
           (bold/render "__This is bold.__" nil))))

  (testing "Creating bold text with both underscores and asterisks mixed"
    (is (= "Hi, my name is <strong>John</strong>, what is <strong>your name?</strong>"
           (bold/render "Hi, my name is **John**, what is __your name?__" nil)))))