seam

commit d01692a12f5e38bd7cced93d2f91f6d4d57683c7
parent 6f94a057441044b3e66c45c7cba094dbf3e750c2
Author: Spencer Williams <spnw@plexwave.org>
Date:   Wed, 16 Apr 2025 14:16:59 -0400

Use literal regexp instead of calling org-headline-re

Diffstat:
M
lisp/seam-export.el
 | 
2
+-
M
lisp/seam.el
 | 
4
++--

2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/seam-export.el b/lisp/seam-export.el
@@ -264,7 +264,7 @@ notes)."
        "contents"
        (seam-export--to-string
          (insert-file-contents note-file)
-         (re-search-forward (org-headline-re 1))
+         (re-search-forward "^\\* ")
          (org-mode)                    ;Needed for `org-set-property'.
          (org-set-property "seam-title-p" "t")))
       (seam-export--replace-variable
diff --git a/lisp/seam.el b/lisp/seam.el
@@ -157,7 +157,7 @@ naming.  Must be a function taking two arguments: TITLE and TYPE."
         (widen)
         (goto-char 1)
         (ignore-errors
-          (re-search-forward (org-headline-re 1))
+          (re-search-forward  "^\\* ")
           (let ((start (point)))
             (end-of-line)
             (let ((title (string-trim (buffer-substring-no-properties start (point)))))
@@ -176,7 +176,7 @@ naming.  Must be a function taking two arguments: TITLE and TYPE."
             (widen)
             (goto-char 1)
             (ignore-errors
-              (re-search-forward (org-headline-re 1))
+              (re-search-forward  "^\\* ")
               (org-element-property :SEAM_SLUG (org-element-at-point))))))
       (seam-slugify (seam-get-title-from-buffer buffer))))