diff options
Diffstat (limited to 'lisp/seam.el')
| -rw-r--r-- | lisp/seam.el | 2 |
1 files changed, 1 insertions, 1 deletions
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))))))) |