Mercurial > emacs
changeset 41666:5cd64b3e28c3
(cookie, cookie-insert, shuffle-vector): Doc fixes.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Thu, 29 Nov 2001 08:35:10 +0000 |
parents | 2f6a11181df8 |
children | 855012065a01 |
files | lisp/play/cookie1.el |
diffstat | 1 files changed, 7 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/play/cookie1.el Thu Nov 29 08:19:43 2001 +0000 +++ b/lisp/play/cookie1.el Thu Nov 29 08:35:10 2001 +0000 @@ -69,16 +69,18 @@ ;;;###autoload (defun cookie (phrase-file startmsg endmsg) - "Return a random phrase from PHRASE-FILE. When the phrase file -is read in, display STARTMSG at beginning of load, ENDMSG at end." + "Return a random phrase from PHRASE-FILE. +When the phrase file is read in, display STARTMSG at the beginning +of load, ENDMSG at the end." (let ((cookie-vector (cookie-snarf phrase-file startmsg endmsg))) (shuffle-vector cookie-vector) (aref cookie-vector 1))) ;;;###autoload (defun cookie-insert (phrase-file &optional count startmsg endmsg) - "Insert random phrases from PHRASE-FILE; COUNT of them. When the phrase file -is read in, display STARTMSG at beginning of load, ENDMSG at end." + "Insert random phrases from PHRASE-FILE; COUNT of them. +When the phrase file is read in, display STARTMSG at the beginning +of load, ENDMSG at the end." (let ((cookie-vector (cookie-snarf phrase-file startmsg endmsg))) (shuffle-vector cookie-vector) (let ((start (point))) @@ -151,7 +153,7 @@ ; ;;;###autoload (defun shuffle-vector (vector) - "Randomly permute the elements of VECTOR (all permutations equally likely)" + "Randomly permute the elements of VECTOR (all permutations equally likely)." (let ((i 0) j temp