Make stylistic change to denote-subdirectory-prompt

This commit is contained in:
Protesilaos Stavrou 2025-10-06 20:14:20 +03:00
parent 7482fbc487
commit 0d5ce4f22b
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA

View file

@ -3528,10 +3528,7 @@ a value that can be parsed by `decode-time' or nil."
"Prompt for subdirectory of the variable `denote-directory'.
The table uses the `file' completion category (so it works with
packages such as `marginalia' and `embark')."
(let* ((roots (mapcar
(lambda (d)
(directory-file-name d))
(denote-directories)))
(let* ((roots (mapcar #'directory-file-name (denote-directories)))
(subdirs (denote-directory-subdirectories))
(dirs (append roots subdirs)))
(denote--subdirs-completion-table dirs)))