branch: externals/denote-sequence
commit 7baab9fbe986a47da3d8d1eb21ebff5f6b30b12e
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>

    Tweak how denote-sequence-reparent-recursive calls the main reparenting 
function
    
    Thanks to Peter Prevos for contributing the original version of this
    in commit cfded6c. This was done in pull request 13:
    <https://github.com/protesilaos/denote-sequence/pull/13>.
---
 denote-sequence.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/denote-sequence.el b/denote-sequence.el
index 348d5eaa10..4962da1ca2 100644
--- a/denote-sequence.el
+++ b/denote-sequence.el
@@ -1213,9 +1213,9 @@ file at point in a Dired buffer, or the variable 
`buffer-file-name'."
 If CURRENT-FILE has a sequence (the Denote file name signature), change
 it.  Else create a new one.
 
-If RECURSIVE is non-nil, also reparent all children and descendants of
-CURRENT-FILE (recursively).  When called interactively, RECURSIVE is
-enabled only with a universal argument (\\[universal-argument]).
+If optional RECURSIVE is non-nil, also reparent all children and
+descendants of CURRENT-FILE.  When called interactively, RECURSIVE is
+the prefix argument (\\[universal-argument] by default).
 
 When called interactively, CURRENT-FILE is either the current file, or a
 special Org buffer (like those of `org-capture'), or the file at point
@@ -1273,8 +1273,7 @@ forces recursive behaviour by simulating a universal 
argument."
              (propertize
               (denote--rename-dired-file-or-current-file-or-prompt)
               'face 'denote-faces-prompt-current-name)))))
-  (let ((current-prefix-arg '(4)))
-    (call-interactively #'denote-sequence-reparent)))
+  (denote-sequence-reparent current-file file-with-sequence :recursive))
 
 ;;;###autoload
 (defun denote-sequence-rename-as-parent (current-file)

Reply via email to