[elpa] externals/denote 97d866ee6d 1/2: Replace denote--add-front-matter with denote-prepend-front-matter

[ELPA Syncer]

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

    Replace denote--add-front-matter with denote-prepend-front-matter
---
 README.org |  7 +++++++
 denote.el  | 17 +++++++++++------
 2 files changed, 18 insertions(+), 6 deletions(-)

diff --git a/README.org b/README.org
index de8604a625..5abc987fa5 100644
--- a/README.org
+++ b/README.org
@@ -5975,6 +5975,13 @@ might change them without further notice.
 + Function ~denote-rename-file-and-buffer~ :: Rename file named
   =OLD-NAME= to =NEW-NAME=, updating buffer name.
 
+#+findex: denote-prepend-front-matter
++ Function ~denote-prepend-front-matter~ :: Prepend front matter to
+  =FILE=. The =TITLE=, =KEYWORDS=, =DATE=, =ID=, =SIGNATURE=, and
+  =FILE-TYPE= are passed from the renaming command and are used to
+  construct a new front matter block if appropriate. [ This function
+  is available as part of {{{development-version}}}. ]
+
 #+findex: denote-rewrite-front-matter
 + Function ~denote-rewrite-front-matter~ :: Rewrite front matter of
   note after ~denote-rename-file~ (or related) The =FILE=, =TITLE=,
diff --git a/denote.el b/denote.el
index 4fd638bc3b..d5b43faf04 100644
--- a/denote.el
+++ b/denote.el
@@ -3101,11 +3101,16 @@ If a buffer is visiting the file, its name is updated."
       (with-current-buffer buffer
         (set-visited-file-name new-name nil t)))))
 
-(defun denote--add-front-matter (file title keywords signature date id 
file-type)
+(define-obsolete-function-alias
+  'denote--add-front-matter
+  'denote-prepend-front-matter
+  "3.2.0")
+
+(defun denote-prepend-front-matter (file title keywords signature date id 
file-type)
   "Prepend front matter to FILE.
-The TITLE, KEYWORDS, DATE, ID, SIGNATURE, and FILE-TYPE are passed from the
-renaming command and are used to construct a new front matter block if
-appropriate."
+The TITLE, KEYWORDS, DATE, ID, SIGNATURE, and FILE-TYPE are passed from
+the renaming command and are used to construct a new front matter block
+if appropriate."
   (when-let* ((new-front-matter (denote--format-front-matter title date 
keywords id signature file-type)))
     (with-current-buffer (find-file-noselect file)
       (goto-char (point-min))
@@ -3462,7 +3467,7 @@ Respect `denote-rename-confirmations', 
`denote-save-buffers' and
         (if (denote--file-has-front-matter-p new-name file-type)
             (denote-rewrite-front-matter new-name title keywords signature 
date id file-type)
           (when (denote-add-front-matter-prompt new-name)
-            (denote--add-front-matter new-name title keywords signature date 
id file-type))))
+            (denote-prepend-front-matter new-name title keywords signature 
date id file-type))))
       (when (and denote--used-ids (not (string-empty-p id)))
         (puthash id t denote--used-ids))
       (denote--handle-save-and-kill-buffer 'rename new-name initial-state)
@@ -4006,7 +4011,7 @@ Construct the file name in accordance with the user option
       (denote-update-dired-buffers)
       (when (and (denote-file-is-writable-and-supported-p new-name)
                  (denote-add-front-matter-prompt new-name))
-        (denote--add-front-matter new-name title keywords signature date id 
new-file-type)
+        (denote-prepend-front-matter new-name title keywords signature date id 
new-file-type)
         (denote--handle-save-and-kill-buffer 'rename new-name 
initial-state)))))
 
 ;;;; The Denote faces