branch: externals/denote
commit b060dc35484bbc01f57d6102e8a3618847b025ab
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Make denote-file-prompt not failt at
read-file-name-completion-ignore-case=nil
Thanks to Mirko Hernández for pointing this out in issue 169 on the
GitHub mirror:
<https://github.com/protesilaos/denote/issues/169#issuecomment-1741684144>.
---
denote.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/denote.el b/denote.el
index 84c77086fd..9bc9f5c991 100644
--- a/denote.el
+++ b/denote.el
@@ -893,13 +893,13 @@ The path is relative to DIRECTORY (default:
‘default-directory’)."
With optional FILES-MATCHING-REGEXP, filter the candidates per
the given regular expression."
(when-let ((files (if files-matching-regexp
- (denote-directory-files-matching-regexp
files-matching-regexp)
- (denote-all-files)))
- (completion-ignore-case read-file-name-completion-ignore-case)
+ (denote-directory-files-matching-regexp
files-matching-regexp)
+ (denote-all-files)))
(file (funcall project-read-file-name-function
"Select note: " files nil 'denote--file-history)))
- (add-to-history 'denote--file-history file)
- file))
+ (let ((completion-ignore-case read-file-name-completion-ignore-case))
+ (add-to-history 'denote--file-history file)
+ file)))
(define-obsolete-function-alias
'denote--retrieve-read-file-prompt
