From b97891cc45b9a087a372767e25aa36788bc979bf Mon Sep 17 00:00:00 2001
From: Asko Nõmm <ano@ano.ee>
Date: Sun, 8 May 2022 12:23:35 +0300
Subject: Naming improvements, code block matcher test

---
 src/clarktown/matchers/fenced_code_block.clj | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 src/clarktown/matchers/fenced_code_block.clj

(limited to 'src/clarktown/matchers/fenced_code_block.clj')

diff --git a/src/clarktown/matchers/fenced_code_block.clj b/src/clarktown/matchers/fenced_code_block.clj
new file mode 100644
index 0000000..9bbcdca
--- /dev/null
+++ b/src/clarktown/matchers/fenced_code_block.clj
@@ -0,0 +1,10 @@
+(ns clarktown.matchers.fenced-code-block
+  (:require
+    [clojure.string :as string]))
+
+
+(defn match?
+  "Determines whether we're dealing with a code block."
+  [block]
+  (and (string/starts-with? block "```")
+       (string/ends-with? block "```")))
-- 
cgit v1.2.3