[elpa] externals/denote 31fc567702 209/355: Accept optional filetype in front matter formatter

[ELPA Syncer]

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

    Accept optional filetype in front matter formatter
---
 denote.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/denote.el b/denote.el
index ca992a3136..a4e4ef9fbe 100644
--- a/denote.el
+++ b/denote.el
@@ -470,13 +470,17 @@ and do not use any empty line before it.
 These help ensure consistency and might prove useful if we need
 to operate on the front matter as a whole.")
 
+(defun denote--file-meta-header (title date keywords id &optional filetype)
   "Front matter for new notes.
 
 TITLE, DATE, KEYWORDS, FILENAME, ID are all strings which are
- provided by `denote'."
+ provided by `denote'.
+
+Optional FILETYPE is one of the values of `denote-file-type',
+else that variable is used."
   (let ((kw-space (denote--file-meta-keywords keywords))
         (kw-toml (denote--file-meta-keywords keywords 'toml)))
-    (pcase denote-file-type
+    (pcase (or filetype denote-file-type)
       ('markdown-toml (format denote-toml-front-matter title date kw-toml id))
       ('markdown-yaml (format denote-yaml-front-matter title date kw-space id))
       ('text (format denote-text-front-matter title date kw-space id 
denote-text-front-matter-delimiter))