diff options
| author | Asko Nõmm <ano@ano.ee> | 2022-05-08 12:23:35 +0300 |
|---|---|---|
| committer | Asko Nõmm <ano@ano.ee> | 2022-05-08 12:23:35 +0300 |
| commit | b97891cc45b9a087a372767e25aa36788bc979bf (patch) | |
| tree | 0401ef1f090575c36f9e110eaeb50412e3fd4139 /test/clarktown/correctors/code_block_test.clj | |
| parent | ff2279150638b43aab4e65b2578a5dbd348e21d8 (diff) | |
Naming improvements, code block matcher test
Diffstat (limited to 'test/clarktown/correctors/code_block_test.clj')
| -rw-r--r-- | test/clarktown/correctors/code_block_test.clj | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/test/clarktown/correctors/code_block_test.clj b/test/clarktown/correctors/code_block_test.clj deleted file mode 100644 index 16711da..0000000 --- a/test/clarktown/correctors/code_block_test.clj +++ /dev/null @@ -1,37 +0,0 @@ -(ns clarktown.correctors.code-block-test - (:require - [clojure.test :refer [deftest testing is]] - [clarktown.correctors.code-block :as corrector])) - - -(deftest code-block-corrector - (testing "Empty line above" - (let [line "```clojure" - lines ["Some text goes here" line "some code here" "```"] - index 1] - (is (true? (corrector/empty-line-above? lines line index))))) - - (testing "No empty line above" - (let [line "```" - lines ["Some text goes here" "\n" line "some code" "```"] - index 2] - (is (false? (corrector/empty-line-above? lines line index))))) - - (testing "Empty line below" - (let [line "```" - lines ["Some text goes here" line "some code" line "some text"] - index 3] - (is (true? (corrector/empty-line-below? lines line index))))) - - (testing "No empty line below" - (let [line "```" - lines ["Some text goes here" line "some code" line "\n" "some text"] - index 3] - (is (false? (corrector/empty-line-below? lines line index))))) - - (testing "No empty line below when ending with code block" - (let [line "```" - lines ["Some text goes here" line "some code" line] - index 3] - (is (false? (corrector/empty-line-below? lines line index)))))) - |
