Mercurial > emacs
comparison lisp/play/bruce.el @ 42041:b4eeb5fd09f9
Fix typos.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Sat, 15 Dec 2001 10:32:44 +0000 |
parents | f1fc193b6958 |
children | 33d53d287ee4 |
comparison
equal
deleted
inserted
replaced
42040:e9b0a8b3214e | 42041:b4eeb5fd09f9 |
---|---|
26 | 26 |
27 ;;; Commentary: | 27 ;;; Commentary: |
28 | 28 |
29 ;; This program was written to protest the miss-named "Communications | 29 ;; This program was written to protest the miss-named "Communications |
30 ;; Decency Act of 1996. This Act bans "indecent speech", whatever that is, | 30 ;; Decency Act of 1996. This Act bans "indecent speech", whatever that is, |
31 ;; from the internet. For more on the CDA, see Richard Stallman's essay on | 31 ;; from the Internet. For more on the CDA, see Richard Stallman's essay on |
32 ;; censorship, included in the etc directory of emacs distributions 19.34 | 32 ;; censorship, included in the etc directory of emacs distributions 19.34 |
33 ;; and up. See also http://www.eff.org/blueribbon.html. | 33 ;; and up. See also http://www.eff.org/blueribbon.html. |
34 | 34 |
35 ;; For many years, emacs has included a program called Spook. This program | 35 ;; For many years, emacs has included a program called Spook. This program |
36 ;; adds a series of "keywords" to email just before it goes out. On the | 36 ;; adds a series of "keywords" to email just before it goes out. On the |
54 ;; However, in order to comply with the CDA as interpreted by Richard | 54 ;; However, in order to comply with the CDA as interpreted by Richard |
55 ;; Stallman (see the essay on censorship), bruce is distributed without a | 55 ;; Stallman (see the essay on censorship), bruce is distributed without a |
56 ;; data file from which to select words at random. Sorry about that. I | 56 ;; data file from which to select words at random. Sorry about that. I |
57 ;; believe the average user will be able to come up with a few words on | 57 ;; believe the average user will be able to come up with a few words on |
58 ;; his or her own. If that is a problem, feel free to ask any American | 58 ;; his or her own. If that is a problem, feel free to ask any American |
59 ;; teenager, preferrably one who attends a government school. Failing | 59 ;; teenager, preferably one who attends a government school. Failing |
60 ;; that, you might write to Mr. Clinton or Ms Reno or their successors and | 60 ;; that, you might write to Mr. Clinton or Ms Reno or their successors and |
61 ;; ask them for suggestions. Think of it as a public spirited act: the | 61 ;; ask them for suggestions. Think of it as a public spirited act: the |
62 ;; time they spend answering you is time not spent persecuting someone | 62 ;; time they spend answering you is time not spent persecuting someone |
63 ;; else. However, do ask them to respond by snail mail, where their | 63 ;; else. However, do ask them to respond by snail mail, where their |
64 ;; suggestions would be legal. | 64 ;; suggestions would be legal. |
68 ;; to be followed by an ascii 0, control-@. See the file spook.lines in | 68 ;; to be followed by an ascii 0, control-@. See the file spook.lines in |
69 ;; the etc directory for an example. In emacs, use c-q c-@ to insert the | 69 ;; the etc directory for an example. In emacs, use c-q c-@ to insert the |
70 ;; ascii 0s. | 70 ;; ascii 0s. |
71 | 71 |
72 ;; Once you have edited up a data file, you have to tell emacs how to find | 72 ;; Once you have edited up a data file, you have to tell emacs how to find |
73 ;; the program bruce. Add the follwing two lines to your .emacs file. Be | 73 ;; the program bruce. Add the following two lines to your .emacs file. Be |
74 ;; sure to uncomment the second line. | 74 ;; sure to uncomment the second line. |
75 | 75 |
76 ;; for bruce mode | 76 ;; for bruce mode |
77 ;; (autoload 'bruce "bruce" "Use the Bruce program to protest the CDA" t) | 77 ;; (autoload 'bruce "bruce" "Use the Bruce program to protest the CDA" t) |
78 | 78 |
110 "Insert phrases selected at random from a file into a buffer." | 110 "Insert phrases selected at random from a file into a buffer." |
111 :prefix "bruce-" | 111 :prefix "bruce-" |
112 :group 'games) | 112 :group 'games) |
113 | 113 |
114 (defcustom bruce-phrases-file "~/bruce.lines" | 114 (defcustom bruce-phrases-file "~/bruce.lines" |
115 "Keep your favorite phrases here." | 115 "Keep your favourite phrases here." |
116 :type 'file | 116 :type 'file |
117 :group 'bruce) | 117 :group 'bruce) |
118 | 118 |
119 (defcustom bruce-phrase-default-count 15 | 119 (defcustom bruce-phrase-default-count 15 |
120 "Default number of phrases to insert." | 120 "Default number of phrases to insert." |