Mercurial > emacs
view lisp/=term-nasty.el @ 15129:e48968f04ea7
(Fthis_single_command_keys): New function.
(syms_of_keyboard): defsubr it.
(this_single_command_key_start): New variable.
(add_command_key): Reduce this_single_command_key_start if nec.
(command_loop_1): Clear this_single_command_key_start if nec.
(Fread_key_sequence, Fexecute_extended_command): Likewise.
(read_key_sequence): Set this_single_command_key_start.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 02 May 1996 22:33:51 +0000 |
parents | 9d4205d1e460 |
children |
line wrap: on
line source
;;; term-nasty.el --- Damned Things from terminfo.el ;;; This text is no longer included in Emacs, because it was censored ;;; by the Communications Decency Act. The law was promoted as a ban ;;; on pornography, but it bans far more than that. This file did not ;;; contain pornography, but it was prohibited nonetheless. ;;; For information on US government censorship of the Internet, and ;;; what you can do to bring back freedom of the press, see the web ;;; site http://www.vtw.org/ ;;; term-nasty.el ends here