branch: externals/denote
commit 93b15ee6de6fc520427d76bf4bc98c1037608250
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Placate the compiler about denote-retrieve-xref-alist
This builds on top of commit f70c96c, which was contributed by Lucas
Quintana in pull request 571:
<https://github.com/protesilaos/denote/pull/571>.
Lucas has assigned copyright to the Free Software Foundation.
---
denote.el | 20 ++++++++++----------
1 file changed, 10 insertions(+), 10 deletions(-)
diff --git a/denote.el b/denote.el
index 5668a7f4a7..0e0e87f7a0 100644
--- a/denote.el
+++ b/denote.el
@@ -2539,10 +2539,19 @@ pass it to `denote-directory-files'."
(denote-retrieve-groups-xref-query query files-matching-regexp))
#'string-collate-lessp))
+(defvar denote-query--last-files nil
+ "List of files matched by the last call to `denote-make-links-buffer'.")
+
+(defvar denote-query--last-query nil
+ "String of the last call to `denote-make-links-buffer'.")
+
+(defvar denote-query--omit-current t
+ "When non-nil `denote-make-links-buffer' omits the current file.")
+
(defun denote-retrieve-xref-alist (query &optional files)
"Return xref alist of absolute file paths with location of matches for QUERY.
Optional FILES can be a list of files to search for. It can also be a
-regular expression, which means to use the text files in
+regular expression, which means to use the text files in the variable
`denote-directory' that match that regexp.
If FILES is not given, use all text files as returned by
@@ -5164,15 +5173,6 @@ Used only by `denote-query-extract-title'."
:group 'denote-grep
:type 'string)
-(defvar denote-query--last-files nil
- "List of files matched by the last call to `denote-make-links-buffer'.")
-
-(defvar denote-query--last-query nil
- "String of the last call to `denote-make-links-buffer'.")
-
-(defvar denote-query--omit-current t
- "When non-nil `denote-make-links-buffer' omits the current file.")
-
(defun denote-query-extract-title (file)
"Extract note title from FILE front matter.
