seam

commit 75ced1b4ce53628dd900c7093544da4929e8a7e4
parent fc34a26c5f9dfc2a05594baddd5940984ee80bad
Author: Spencer Williams <spnw@plexwave.org>
Date:   Mon, 14 Apr 2025 18:33:20 -0400

Switch to cl-sort (Emacs 29 compat)

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

1 file changed, 3 insertions(+), 3 deletions(-)
diff --git 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)))))))