cripslock

commit aa9b4fec051178ad6a2c43aadebd076a6cac45b0
parent 0833024368c41ab2135f4a3082ba069deb327a0c
Author: Daniel Barlow <dan@telent.net>
Date:   Wed, 23 Jul 2025 17:46:03 +0100

textile: don't process inline markup where the body is empty

"--help" is just two hyphens, not a zero-width strikeout region

Diffstat:
M
textile.fnl
 | 
8
+++++++-

1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/textile.fnl b/textile.fnl
@@ -76,7 +76,7 @@
 
 (fn scan-tok [endtok tag]
   (fn [f str]
-    (let [(s e) (string.find str endtok 2 true)]
+    (let [(s e) (string.find str endtok 3 true)]
       (if s
           (values
            (doto (f (string.sub str 2 (- s 1)))
@@ -188,6 +188,12 @@ code"]
 filesystem.  "])
 
 
+  (expect= (inline-markup "use the --help option to be lied to")
+           ["use the " "--help option to be lied to"])
+
+
+
+
   )