diff options
| -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)))) |