branch: externals/denote commit 32847629184e35632a5c30577e00e247bbdb5608 Author: Jean-Philippe Gagné Guay <jeanphilippe...@gmail.com> Commit: Jean-Philippe Gagné Guay <jeanphilippe...@gmail.com>
Simplify denote--directory-files-matching-regexp --- denote.el | 15 ++++++--------- 1 file changed, 6 insertions(+), 9 deletions(-) diff --git a/denote.el b/denote.el index f467211b78..8e3def84a4 100644 --- a/denote.el +++ b/denote.el @@ -454,15 +454,12 @@ names that are relative to the variable `denote-directory'." (defun denote--directory-files-matching-regexp (regexp) "Return list of files matching REGEXP." - (delq - nil - (mapcar - (lambda (f) - (when (and (denote--only-note-p f) - (string-match-p regexp f) - (not (string= (file-name-nondirectory (buffer-file-name)) f))) - f)) - (denote--directory-files)))) + (seq-filter + (lambda (f) + (and (denote--only-note-p f) + (string-match-p regexp f) + (not (string= (file-name-nondirectory (buffer-file-name)) f)))) + (denote--directory-files))) ;;;; Keywords