emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/denote 95cd9f88bf 3/4: Make stylistic tweaks to 39a20a7


From: ELPA Syncer
Subject: [elpa] externals/denote 95cd9f88bf 3/4: Make stylistic tweaks to 39a20a7
Date: Fri, 4 Nov 2022 13:57:32 -0400 (EDT)

branch: externals/denote
commit 95cd9f88bf812a21f2f6d3c1974dec6f2078d3fb
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Make stylistic tweaks to 39a20a7
    
    This is to make it look consistent consistent with the rest of the
    code.
---
 denote.el | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/denote.el b/denote.el
index b335c8fa61..d73fb6f2a7 100644
--- a/denote.el
+++ b/denote.el
@@ -379,10 +379,12 @@ current note."
 
 (make-obsolete 'denote-link-fontify-backlinks 'denote-backlinks-show-context 
"1.2.0")
 
-(defcustom denote-directory-exclusions nil
-  "Regular expression that excludes matching directories from 
denote-file-prompt.
+(defcustom denote-excluded-directories-regexp nil
+  "Regular expression of directories to exclude from file prompts.
+When nil (the default value) all directory names are shown.
 
-When nil (the default value) all directory names are allowed."
+File prompts are used by several commands, such as `denote-link'.
+The underlying function is `denote-file-prompt'."
   :group 'denote
   :package-version '(denote . "1.2.0")
   :type 'string)
@@ -558,13 +560,11 @@ and use one of the extensions implied by 
`denote-file-type'."
 
 (defun denote-file-directory-p (file)
   "Return non-nil if FILE is a directory.
-You can exclude certain directories by customizing the
-`denote-directory-exclusions' regular expresion."
-  (and
-   (file-directory-p file)
-   (if denote-directory-exclusions
-       (not (string-match-p denote-directory-exclusions file))
-     t)))
+Omit FILE if it matches the value of user option
+`denote-excluded-directories-regexp'."
+  (and (file-directory-p file)
+       denote-excluded-directories-regexp
+       (not (string-match-p denote-excluded-directories-regexp file))))
 
 (defun denote-file-has-supported-extension-p (file)
   "Return non-nil if FILE has supported extension.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]