branch: externals/denote
commit bb10f74f15bc1860d66182b2c85bb42248d5272b
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Rename private function for markdown tags
---
denote.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/denote.el b/denote.el
index 85c2e3da0c..f4442b61c1 100644
--- a/denote.el
+++ b/denote.el
@@ -552,7 +552,7 @@ which include the starting dot or the return value of
(t
(format "%s%s%s" path id ext)))))
-(defun denote--map-quote-downcase (seq)
+(defun denote--format-markdown-keywords (seq)
"Quote and downcase elements in SEQ."
(mapconcat (lambda (k)
(format "%S" (downcase k)))
@@ -569,7 +569,7 @@ be `toml' or, in the future, some other spec that needss
special
treatment)."
(let ((kw (denote--sluggify-keywords keywords)))
(pcase type
- ('markdown-toml (format "[%s]" (denote--map-quote-downcase kw)))
+ ('markdown-toml (format "[%s]" (denote--format-markdown-keywords kw)))
(_ (mapconcat #'downcase kw " ")))))
(defvar denote-toml-front-matter
