branch: master commit e479a3e57b688ca80d0cafe292a0eb27556d8b2d Author: Nicolas Petton <nico...@petton.fr> Commit: Nicolas Petton <nico...@petton.fr>
Fix seq-random-elt docstring * packages/seq/seq-24.el: * packages/seq/seq-25.el (seq-random-elt): Fix the docstring. --- packages/seq/seq-24.el | 2 +- packages/seq/seq-25.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/packages/seq/seq-24.el b/packages/seq/seq-24.el index 09fbf04..3f9cd88 100644 --- a/packages/seq/seq-24.el +++ b/packages/seq/seq-24.el @@ -373,7 +373,7 @@ SEQUENCE must be a sequence of numbers or markers." (defun seq-random-elt (sequence) "Return a random element from SEQUENCE. -Return nil if SEQUENCE is nil." +Signal an error if SEQUENCE is empty." (if (seq-empty-p sequence) (error "Sequence cannot be empty") (seq-elt sequence (random (seq-length sequence))))) diff --git a/packages/seq/seq-25.el b/packages/seq/seq-25.el index f1282a1..c2268dd 100644 --- a/packages/seq/seq-25.el +++ b/packages/seq/seq-25.el @@ -496,7 +496,7 @@ If no element is found, return nil." (cl-defgeneric seq-random-elt (sequence) "Return a random element from SEQUENCE. -Return nil if SEQUENCE is nil." +Signal an error if SEQUENCE is empty." (if (seq-empty-p sequence) (error "Sequence cannot be empty") (seq-elt sequence (random (seq-length sequence)))))