From 75ced1b4ce53628dd900c7093544da4929e8a7e4 Mon Sep 17 00:00:00 2001 From: Spencer Williams Date: Mon, 14 Apr 2025 18:33:20 -0400 Subject: Switch to cl-sort (Emacs 29 compat) --- lisp/seam-export.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/seam-export.el b/lisp/seam-export.el index 7fa6c2d..9696eec 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))))))) -- cgit v1.2.3