summaryrefslogtreecommitdiff
path: root/test/clarktown/matchers/quote_block_test.clj
blob: 05288d66dbdd0aa500a632ff9a5291b6a7fbea27 (plain)
1
2
3
4
5
6
7
8
9
10
11
(ns clarktown.matchers.quote-block-test
  (:require
    [clojure.test :refer [deftest testing is]]
    [clarktown.matchers.quote-block :as quote-block]))


(deftest quote-block-block-matcher-test
  (testing "Checking a quote block"
    (is (true? (quote-block/match? "> Test")))
    (is (true? (quote-block/match? "    > Test")))
    (is (true? (quote-block/match? ">")))))