The markers do not need to span the full width anymore.
authorFrancois Fleuret <francois.fleuret@idiap.ch>
Sun, 10 Mar 2019 12:18:08 +0000 (13:18 +0100)
committerFrancois Fleuret <francois.fleuret@idiap.ch>
Sun, 10 Mar 2019 12:18:08 +0000 (13:18 +0100)
text-counters.el

index 4f08d68..6f2e65c 100644 (file)
 
 (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)