projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4722db6
)
* lisp/emacs-lisp/seq.el (seq-random-elt): Fix docstring.
author
Nicolas Petton
<nicolas@petton.fr>
Tue, 25 Oct 2016 15:06:03 +0000
(17:06 +0200)
committer
Nicolas Petton
<nicolas@petton.fr>
Tue, 25 Oct 2016 15:07:07 +0000
(17:07 +0200)
lisp/emacs-lisp/seq.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/seq.el
b/lisp/emacs-lisp/seq.el
index 5c89d2b300734a5d1355ca6ac7e1847691c535ad..2b4330c1a3c41a0eb916edaa19fa1772e78880ce 100644
(file)
--- 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)))))