From ef26aec8abb8e27cb84ab225a8547f5b7a17dec6 Mon Sep 17 00:00:00 2001 From: Spencer Williams Date: Tue, 8 Apr 2025 11:05:59 -0400 Subject: Don't pass alist to completing read (fixes ido-completing-read issue) --- lisp/seam.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/seam.el') diff --git a/lisp/seam.el b/lisp/seam.el index 9186be9..9a4f744 100644 --- a/lisp/seam.el +++ b/lisp/seam.el @@ -216,7 +216,7 @@ naming. Must be a function taking two arguments: TITLE and TYPE." (and self (list self))))) (let ((files (cl-loop for (title . file) in notes collect (cons (seam-format-title title (seam-get-note-type file)) file)))) - (let ((completion (string-trim (funcall seam-completing-read-function prompt files)))) + (let ((completion (string-trim (funcall seam-completing-read-function prompt (mapcar #'car files))))) (or (assoc completion files) (cons completion nil))))))) -- cgit v1.2.3