diff options
Diffstat (limited to 'lisp/seam-export.el')
-rw-r--r-- | lisp/seam-export.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/seam-export.el b/lisp/seam-export.el index 7fa6c2d..d0f59cc 100644 --- a/lisp/seam-export.el +++ b/lisp/seam-export.el @@ -226,12 +226,12 @@ notes)." (defun seam-export--generate-backlinks (file) (seam-export--to-string - (let ((files (sort + (let ((files (cl-sort (let ((seam--subset seam-export--types)) (cl-loop for x in (seam-get-links-to-file file) collect (cons (seam-get-title-from-file x) x))) - :key #'car - :lessp #'string<))) + #'string< + :key #'car))) (when files (cl-loop for (title . file) in files do (insert (format "- [[seam:%s][%s]]\n" (file-name-base file) title))))))) @@ -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 |