summaryrefslogtreecommitdiff
path: root/src/clarktown/matchers/indented_code_block.clj
diff options
context:
space:
mode:
authorAsko Nõmm <ano@ano.ee>2022-05-12 21:09:38 +0300
committerGitHub <noreply@github.com>2022-05-12 21:09:38 +0300
commit2ff0da12f58d17b6c1ab3736a41595073b3a534e (patch)
tree52dab7ba9cb71ca06c334cada0b8fc2c99c3fb91 /src/clarktown/matchers/indented_code_block.clj
parent94c1c0ca639f55ff9073cb1fdf2ad6015bb6bae1 (diff)
parentdc2a364db6d14d4afa9da9aadbccb8fdbb038fe4 (diff)
Merge pull request #31 from askonomm/7-support-indented-code-blocks
Implement indented code blocks.
Diffstat (limited to 'src/clarktown/matchers/indented_code_block.clj')
-rw-r--r--src/clarktown/matchers/indented_code_block.clj10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/clarktown/matchers/indented_code_block.clj b/src/clarktown/matchers/indented_code_block.clj
new file mode 100644
index 0000000..b7cf563
--- /dev/null
+++ b/src/clarktown/matchers/indented_code_block.clj
@@ -0,0 +1,10 @@
+(ns clarktown.matchers.indented-code-block
+ (:require
+ [clojure.string :as string]))
+
+
+(defn match?
+ "Determines whether the given block is a indented code block."
+ [block]
+ (->> (string/split-lines block)
+ (every? #(>= (count (take-while #{\space} %)) 4)))) \ No newline at end of file