diff options
author | Spencer Williams <spnw@plexwave.org> | 2025-04-16 14:16:59 -0400 |
---|---|---|
committer | Spencer Williams <spnw@plexwave.org> | 2025-04-16 14:16:59 -0400 |
commit | d01692a12f5e38bd7cced93d2f91f6d4d57683c7 (patch) | |
tree | bc59b509fc00be725261762ad9f662123708bd15 /lisp | |
parent | 6f94a057441044b3e66c45c7cba094dbf3e750c2 (diff) |
Use literal regexp instead of calling org-headline-re
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/seam-export.el | 2 | ||||
-rw-r--r-- | lisp/seam.el | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lisp/seam-export.el b/lisp/seam-export.el index 9696eec..d0f59cc 100644 --- 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 index d8e8138..201bbdf 100644 --- 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)))) |