[elpa] externals/denote 4cd24c9730 4/9: Format identifier in denote--format-front-matter

[ELPA Syncer]

branch: externals/denote
commit 4cd24c9730d571ba4710a4505847598578a26138
Author: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>
Commit: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>

    Format identifier in denote--format-front-matter
---
 denote.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index 00412d940a..4d6b183535 100644
--- a/denote.el
+++ b/denote.el
@@ -1428,7 +1428,7 @@ Change the front matter format'.")
 title:      %s
 date:       %s
 tags:       %s
-identifier: %S
+identifier: %s
 ---\n\n"
   "YAML (Markdown) front matter.
 It is passed to `format' with arguments TITLE, DATE, KEYWORDS,
@@ -1440,7 +1440,7 @@ Change the front matter format'.")
 title      = %s
 date       = %s
 tags       = %s
-identifier = %S
+identifier = %s
 +++\n\n"
   "TOML (Markdown) front matter.
 It is passed to `format' with arguments TITLE, DATE, KEYWORDS,
@@ -1801,8 +1801,9 @@ strings.  FILETYPE is one of the values of variable 
`denote-file-type'."
   (let* ((fm (denote--front-matter filetype))
          (title (denote--format-front-matter-title title filetype))
          (date-string (denote--date date filetype))
-         (kws (denote--format-front-matter-keywords keywords filetype)))
-    (if fm (format fm title date-string kws id) "")))
+         (kws (denote--format-front-matter-keywords keywords filetype))
+         (id-string (funcall (denote--identifier-value-function filetype) id)))
+    (if fm (format fm title date-string kws id-string) "")))
 
 ;;;; Front matter or content retrieval functions