X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=text-counters.el;fp=text-counters.el;h=e68e67732db718e4d84dfc21d7df9c441ddd53d1;hp=6f2e65cd6dfe53e248c7e6c30faed6b689db4280;hb=6db14edb65c0489df2628db4592961a95cdbdc16;hpb=6739afc59a89622092bdd5e334962ec8c42e1db5

diff --git a/text-counters.el b/text-counters.el
index 6f2e65c..e68e677 100644
--- a/text-counters.el
+++ b/text-counters.el
@@ -34,10 +34,10 @@
 
 (defun tc/text-counters-string () (interactive)
   (let ((a (save-excursion
-             (and (re-search-backward "^--.*--*" nil t)
+             (and (re-search-backward "^[#% ]*--.*--*" nil t)
                   (match-end 0))))
         (b (save-excursion
-             (and (re-search-forward "^--.*--*" nil t)
+             (and (re-search-forward "^[#% ]*--.*--*" nil t)
                   (match-beginning 0)))))
 
     (when (and a b)