branch: externals/denote
commit c4cb46f5929138bc9c93f62dc17b0d7c7de88ef5
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Rename a binding in denote-sort-dired for clarity and consistency
---
denote.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/denote.el b/denote.el
index 4569424424..80537f9e4d 100644
--- a/denote.el
+++ b/denote.el
@@ -1975,13 +1975,13 @@ When called from Lisp, the arguments are a string, a
symbol among
`denote-sort-components', a non-nil value, and a string, respectively."
(interactive (append (list (denote-files-matching-regexp-prompt))
(denote-sort-dired--prompts)))
(pcase-let* ((`(,component . ,reverse-sort)
(denote-sort-dired--get-sort-parameters sort-by-component reverse))
- (relative-p (denote-has-single-denote-directory-p))
+ (single-dir-p (denote-has-single-denote-directory-p))
(files-fn `(lambda ()
(let ((files (denote-sort-get-directory-files
,files-matching-regexp ',component ,reverse-sort nil ,exclude-regexp)))
- (if ,relative-p
+ (if ,single-dir-p
(mapcar #'file-relative-name files)
files)))))
- (if-let* ((directory (if relative-p ; see comment in `denote-file-prompt'
+ (if-let* ((directory (if single-dir-p ; see comment in `denote-file-prompt'
(car (denote-directories))
(denote-directories-get-common-root)))
(files (funcall files-fn))
