[elpa] externals/denote a02f768b63 03/12: BREAKING: Rename to denote-get-file-name-relative-to-denote-directory

[ELPA Syncer]

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

    BREAKING: Rename to denote-get-file-name-relative-to-denote-directory
    
    This changes commit fb92d22, which was pushed about 20 minutes ago.
---
 denote.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/denote.el b/denote.el
index a7620c1670..79e08719af 100644
--- a/denote.el
+++ b/denote.el
@@ -523,7 +523,7 @@ Supported extensions are those implied by 
`denote-file-type'."
   'denote-file-is-writable-and-supported-p
   "1.0.0")
 
-(defun denote-file-name-relative-to-denote-directory (file)
+(defun denote-get-file-name-relative-to-denote-directory (file)
   "Return name of FILE relative to the variable `denote-directory'.
 FILE must be an absolute path."
   (when-let* ((dir (denote-directory))
@@ -534,7 +534,7 @@ FILE must be an absolute path."
 
 (define-obsolete-function-alias
   'denote--file-name-relative-to-denote-directory
-  'denote-file-name-relative-to-denote-directory
+  'denote-get-file-name-relative-to-denote-directory
   "1.0.0")
 
 ;; TODO 2022-09-14: Do we actually need the following two given the
@@ -580,7 +580,7 @@ value, as explained in its doc string."
   "Return list of files matching REGEXP in `denote-directory-files'."
   (seq-filter
    (lambda (f)
-     (string-match-p regexp (denote-file-name-relative-to-denote-directory f)))
+     (string-match-p regexp (denote-get-file-name-relative-to-denote-directory 
f)))
    (denote-directory-files)))
 
 (define-obsolete-function-alias
@@ -1218,8 +1218,8 @@ where the former does not read dates without a time 
component."
   (seq-remove
    (lambda (filename)
      (or (not (file-directory-p filename))
-         (string-match-p "\\`\\." 
(denote-file-name-relative-to-denote-directory filename))
-         (string-match-p "/\\." (denote-file-name-relative-to-denote-directory 
filename))))
+         (string-match-p "\\`\\." 
(denote-get-file-name-relative-to-denote-directory filename))
+         (string-match-p "/\\." 
(denote-get-file-name-relative-to-denote-directory filename))))
    (directory-files-recursively (denote-directory) ".*" t t)))
 
 ;;;;; The `denote' command and its prompts
@@ -2204,7 +2204,7 @@ format is always [[denote:IDENTIFIER]]."
 
 (defun denote-link--find-file-prompt (files)
   "Prompt for linked file among FILES."
-  (let ((file-names (mapcar #'denote-file-name-relative-to-denote-directory
+  (let ((file-names (mapcar #'denote-get-file-name-relative-to-denote-directory
                             files)))
     (completing-read
      "Find linked file "
@@ -2397,7 +2397,7 @@ Use optional TITLE for a prettier heading."
                   (l (length heading)))
         (insert (format "%s\n%s\n\n" heading (make-string l ?-))))
       (mapc (lambda (f)
-              (insert (denote-file-name-relative-to-denote-directory f))
+              (insert (denote-get-file-name-relative-to-denote-directory f))
               (make-button (line-beginning-position) (line-end-position) :type 
'denote-link-backlink-button)
               (newline))
             files)