diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index 5c89d2b3007..2b4330c1a3c 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -479,7 +479,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)))))