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

    Rewrite the second parameter of 'denote-sequence' to avoid confusion
---
 denote-sequence.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/denote-sequence.el b/denote-sequence.el
index 39d0f27e8a..f9a0b03839 100644
--- a/denote-sequence.el
+++ b/denote-sequence.el
@@ -207,21 +207,21 @@ A sequence is a Denote signature that conforms with 
`denote-sequence-p'."
     (error "There are no sequence notes in the `denote-directory'")))
 
 ;;;###autoload
-(defun denote-sequence (type &optional sequence)
+(defun denote-sequence (type &optional file-with-sequence)
   "Create a new sequence note of TYPE among `denote-sequence-types'.
 If TYPE is either `child' or `sibling', then it is an extension of SEQUENCE.
 
-When called interactively, prompt for TYPE and, when necessary, for file
-whose SEQUENCE will be used to derive a new sequence.
-
-When called from Lisp, SEQUENCE is a string conforming with 
`denote-sequence-p'."
+When called interactively, prompt for TYPE and, when necessary, for
+FILE-WITH-SEQUENCE whose sequence will be used to derive a new sequence.
+Files available at the minibuffer prompt are those returned by
+`denote-sequence-get-all-files'."
   (interactive
    (let ((selected-type (denote-sequence-type-prompt)))
      (list
       selected-type
       (when (memq selected-type (delq 'parent denote-sequence-types))
         (denote-retrieve-filename-signature (denote-sequence-file-prompt))))))
-  (let* ((new-sequence (denote-sequence-get type sequence))
+  (let* ((new-sequence (denote-sequence-get type file-with-sequence))
          (denote-use-signature new-sequence))
     (call-interactively 'denote)))
 

Reply via email to