diff options
| author | Nicolas Petton | 2016-10-25 17:06:03 +0200 |
|---|---|---|
| committer | Nicolas Petton | 2016-10-25 17:07:07 +0200 |
| commit | b4f09b92bc09d66d01206ec0f5e20b1d2701cd86 (patch) | |
| tree | dfdc49ed62e3ca4ba8ea655ea3dc04891ba8c273 | |
| parent | 4722db6c96da5d9e8f307db7a385fd3d0ab48158 (diff) | |
| download | emacs-b4f09b92bc09d66d01206ec0f5e20b1d2701cd86.tar.gz emacs-b4f09b92bc09d66d01206ec0f5e20b1d2701cd86.zip | |
* lisp/emacs-lisp/seq.el (seq-random-elt): Fix docstring.
| -rw-r--r-- | lisp/emacs-lisp/seq.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 479 | 479 | ||
| 480 | (cl-defgeneric seq-random-elt (sequence) | 480 | (cl-defgeneric seq-random-elt (sequence) |
| 481 | "Return a random element from SEQUENCE. | 481 | "Return a random element from SEQUENCE. |
| 482 | Return nil if SEQUENCE is nil." | 482 | Signal an error if SEQUENCE is empty." |
| 483 | (if (seq-empty-p sequence) | 483 | (if (seq-empty-p sequence) |
| 484 | (error "Sequence cannot be empty") | 484 | (error "Sequence cannot be empty") |
| 485 | (seq-elt sequence (random (seq-length sequence))))) | 485 | (seq-elt sequence (random (seq-length sequence))))) |