annotate lisp/=term-nasty.el @ 8497:3d566eab9870

type-break-time-sum: New function. type-break-schedule: Use it. Make interactive again. type-break-guestimate-keystroke-threshold: Use `N' interactive spec, not `n'. type-break-demo-boring: Show elapsed time of break, or number of minutes left for good break. (top level): Do not call type-break-mode.
author Noah Friedman <friedman@splode.com>
date Tue, 09 Aug 1994 21:21:28 +0000
parents ca3af688a85d
children 3938a0350eea
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
657
fec3f9a1e3e5 *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 83
diff changeset
1 ;;; term-nasty.el --- Damned Things from terminfo.el
897
ca3af688a85d entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 840
diff changeset
2 ;;; This file is in the public domain, and was written by Stallman and Mlynarik
657
fec3f9a1e3e5 *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 83
diff changeset
3
775
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
4 ;;; Commentary:
83
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
775
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
6 ;; Some people used to be bothered by the following comments that were
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
7 ;; found in terminal.el. We decided they were distracting, and that it
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
8 ;; was better not to have them there. On the other hand, we didn't want
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
9 ;; to appear to be giving in to the pressure to censor obscenity that
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
10 ;; currently threatens freedom of speech and of the press in the US.
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
11 ;; So we decided to put the comments here.
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
12
1ca26ccad38e *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 657
diff changeset
13 ;;; Code:
83
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15 These comments were removed from te-losing-unix.
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16 ;(what lossage)
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 ;(message "fucking-unix: %d" char)
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
18
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
19 This was before te-process-output.
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
20 ;; fucking unix has -such- braindamaged lack of tty control...
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
22 And about the need to handle output characters such as C-m, C-g, C-h
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23 and C-i even though the termcap doesn't say they may be used:
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
24 ;fuck me harder
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25 ;again and again!
aafe1b6c4ab7 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
26 ;wa12id!!
657
fec3f9a1e3e5 *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 83
diff changeset
27 ;(spiked)
fec3f9a1e3e5 *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 83
diff changeset
28
fec3f9a1e3e5 *** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 83
diff changeset
29 ;;; term-nasty.el ends here