[elpa] externals/denote 83b6e35880 20/29: Make query links use their own face in Org buffers

[ELPA Syncer]

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

    Make query links use their own face in Org buffers
    
    I will extend this to 'denote-fontify-links'. The technical discussion
    for this is in issue 561: 
<https://github.com/protesilaos/denote/issues/561>.
---
 denote.el | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/denote.el b/denote.el
index 2bcb2994f6..e485479140 100644
--- a/denote.el
+++ b/denote.el
@@ -4373,6 +4373,11 @@ Construct the file name in accordance with the user 
option
   :group 'denote-faces
   :package-version '(denote . "0.5.0"))
 
+(defface denote-faces-query-link '((t :inherit link-visited))
+  "Face used to style Denote query links in the buffer."
+  :group 'denote-faces
+  :package-version '(denote . "4.0.0"))
+
 (defface denote-faces-subdirectory '((t :inherit bold))
   "Face for subdirectory of file name.
 This should only ever needed in the backlinks' buffer (or
@@ -5853,6 +5858,12 @@ backend."
               (path (denote-get-path-by-id identifier)))
     path))
 
+(defun denote-link-ol-face (path)
+  "Return appropriate face for PATH."
+  (if (denote-identifier-p path)
+      'denote-faces-link
+    'denote-faces-query-link))
+
 ;; The `eval-after-load' part with the quoted lambda is adapted from
 ;; Elfeed: <https://github.com/skeeto/elfeed/>.
 
@@ -5867,7 +5878,7 @@ backend."
           (org-link-set-parameters
            "denote"
            :follow #'denote-link-ol-follow
-           :face 'denote-faces-link
+           :face #'denote-link-ol-face
            :help-echo #'denote-link-ol-help-echo
            :complete #'denote-link-ol-complete
            :store #'denote-link-ol-store