[elpa] externals/denote 00feb6cac6 2/2: Add helpers for keyword retrieval in front matter

[ELPA Syncer]

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

    Add helpers for keyword retrieval in front matter
---
 denote-retrieve.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/denote-retrieve.el b/denote-retrieve.el
index d9a87c04dc..fd21df0453 100644
--- a/denote-retrieve.el
+++ b/denote-retrieve.el
@@ -45,6 +45,10 @@
   "^\\(?:#\\+\\)?\\(?:date\\)\\s-*[:=]"
   "Regular expression for date key.")
 
+(defconst denote-retrieve--keywords-front-matter-key-regexp
+  "^\\(?:#\\+\\)?\\(?:tags\\|filetags\\)\\s-*[:=]"
+  "Regular expression for keywords key.")
+
 (defun denote-retrieve--filename-identifier (file)
   "Extract identifier from FILE name."
   (if (file-exists-p file)
@@ -81,6 +85,11 @@ If optional KEY is non-nil, return the key instead."
 If optional KEY is non-nil, return the key instead."
   (denote-retrieve--search file denote-retrieve--date-front-matter-key-regexp 
key))
 
+(defun denote-retrieve--value-keywords (file &optional key)
+  "Return keywords value from FILE.
+If optional KEY is non-nil, return the key instead."
+  (denote-retrieve--search file 
denote-retrieve--keywords-front-matter-key-regexp key))
+
 (defun denote-retrieve--read-file-prompt ()
   "Prompt for regular file in variable `denote-directory'."
   (read-file-name "Select note: " (denote-directory) nil nil nil