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)))