[elpa] externals/denote 3c9a99d21f 1/2: Refine what was done in commit 5c2237e

[ELPA Syncer]

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

    Refine what was done in commit 5c2237e
---
 denote.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index 83cc8fd1da..6dec2bdedd 100644
--- a/denote.el
+++ b/denote.el
@@ -2206,11 +2206,12 @@ Consult the manual for template samples."
 
 ;;;; For the migration of old Org filetags
 
-(defun denote--migrate-org-files ()
-  "Return list of Org files in variable `denote-directory'."
+(defun denote--migrate-type-files (type)
+  "Return list of TYPE files in variable `denote-directory'.
+TYPE is a string which matches the `file-name-extension'."
   (seq-remove
    (lambda (file)
-     (not (string= (file-name-extension file) "org")))
+     (not (string= (file-name-extension file) type)))
    (denote--directory-files)))
 
 ;;;###autoload
@@ -2241,7 +2242,7 @@ shall be deprecated and eventually removed from future 
versions
 of Denote.  Written on 2022-08-10 for version 0.5.0."
   (interactive)
   (when-let (((yes-or-no-p "Rewrite filetags in Org files to use colons 
(buffers are NOT saved)?"))
-             (files (denote--migrate-org-files)))
+             (files (denote--migrate-type-files "org")))
     (dolist (file files)
       (when-let* ((kw (denote--front-matter-keywords-to-list file))
                   ((denote--edit-front-matter-p file)))