From 2e548f1bc696db90d11024600d5ccce73131135f Mon Sep 17 00:00:00 2001
From: Asko Nõmm <ano@ano.ee>
Date: Sat, 30 Apr 2022 13:11:13 +0300
Subject: Allow an ATX heading block to precede with up to 3 spaces

---
 src/clarktown/matchers/heading_block.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/clarktown/matchers/heading_block.clj b/src/clarktown/matchers/heading_block.clj
index 1a9a451..7cf931d 100644
--- a/src/clarktown/matchers/heading_block.clj
+++ b/src/clarktown/matchers/heading_block.clj
@@ -6,7 +6,7 @@
 (defn is-atx-heading?
   "Determines whether the given block is a atx heading."
   [block]
-  (re-matches #"^\#{1,6}\s.*" block))
+  (re-matches #"^\s{0,3}?\#{1,6}\s.*" block))
 
 
 (defn is-settext-heading?
-- 
cgit v1.2.3