diff options
| author | Eric S. Raymond | 1992-07-14 18:50:09 +0000 |
|---|---|---|
| committer | Eric S. Raymond | 1992-07-14 18:50:09 +0000 |
| commit | 6cf0d154a1e22e6c8da5aa55245ba1fde2859d7b (patch) | |
| tree | 1454b224ab4a14b1730216c853a1613b5b6d8e2a /lisp/play | |
| parent | f676886a9ea3e4f2cb9275a658c69c899056a500 (diff) | |
| download | emacs-6cf0d154a1e22e6c8da5aa55245ba1fde2859d7b.tar.gz emacs-6cf0d154a1e22e6c8da5aa55245ba1fde2859d7b.zip | |
*** empty log message ***
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/yow.el | 18 |
1 files changed, 13 insertions, 5 deletions
diff --git a/lisp/play/yow.el b/lisp/play/yow.el index c638c5cd834..9f71ee5b925 100644 --- a/lisp/play/yow.el +++ b/lisp/play/yow.el | |||
| @@ -1,4 +1,7 @@ | |||
| 1 | ;; yow.el --- generate random zippyisms | 1 | ;;; yow.el --- generate random zippyisms |
| 2 | |||
| 3 | ;; Maintainer: FSF | ||
| 4 | ;; Last-modified: 14 Jun 1992 | ||
| 2 | 5 | ||
| 3 | ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc. | 6 | ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc. |
| 4 | 7 | ||
| @@ -18,13 +21,18 @@ | |||
| 18 | ;; along with GNU Emacs; see the file COPYING. If not, write to | 21 | ;; along with GNU Emacs; see the file COPYING. If not, write to |
| 19 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 22 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
| 20 | 23 | ||
| 24 | ;;; Commentary: | ||
| 25 | |||
| 26 | ;; Important pinheaddery for GNU Emacs. | ||
| 27 | ;; Expects file emacs/etc/yow.lines to be in ITS-style LINS format | ||
| 28 | ;; (ie strings terminated by ascii 0 characters. Leading whitespace ignored) | ||
| 29 | ;; Everything up to the first \000 is a comment. | ||
| 30 | |||
| 31 | ;;; Code: | ||
| 32 | |||
| 21 | ; Randomize the seed in the random number generator. | 33 | ; Randomize the seed in the random number generator. |
| 22 | (random t) | 34 | (random t) |
| 23 | 35 | ||
| 24 | ; Important pinheaddery for GNU Emacs. | ||
| 25 | ; Expects file emacs/etc/yow.lines to be in ITS-style LINS format | ||
| 26 | ; (ie strings terminated by ascii 0 characters. Leading whitespace ignored) | ||
| 27 | ; Everything up to the first \000 is a comment. | ||
| 28 | ;;;###autoload | 36 | ;;;###autoload |
| 29 | (defun yow (&optional n interactive) | 37 | (defun yow (&optional n interactive) |
| 30 | "Return or display a Zippy quotation." | 38 | "Return or display a Zippy quotation." |