Mercurial > emacs
comparison lisp/emulation/edt.el @ 2570:a880046a1a67
Some fsets changed to defaliases.
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Fri, 23 Apr 1993 06:50:51 +0000 |
parents | 9f3cc03dae67 |
children | 7cda082508c9 |
comparison
equal
deleted
inserted
replaced
2569:39ad4eda7fea | 2570:a880046a1a67 |
---|---|
388 (global-set-key "\177" edt-mode-old-delete) ;"Delete" | 388 (global-set-key "\177" edt-mode-old-delete) ;"Delete" |
389 (define-key emacs-lisp-mode-map "\177" edt-mode-old-lisp-delete) ;"Delete" | 389 (define-key emacs-lisp-mode-map "\177" edt-mode-old-lisp-delete) ;"Delete" |
390 (define-key lisp-mode-map "\177" edt-mode-old-lisp-delete) ;"Delete" | 390 (define-key lisp-mode-map "\177" edt-mode-old-lisp-delete) ;"Delete" |
391 (global-set-key "\C-j" edt-mode-old-linefeed)) ;"LineFeed" | 391 (global-set-key "\C-j" edt-mode-old-linefeed)) ;"LineFeed" |
392 | 392 |
393 (fset 'GOLD-prefix GOLD-map) | 393 (defalias 'GOLD-prefix GOLD-map) |
394 | 394 |
395 (defvar GOLD-map (make-keymap) | 395 (defvar GOLD-map (make-keymap) |
396 "`GOLD-map' maps the function keys on the VT100 keyboard preceeded | 396 "`GOLD-map' maps the function keys on the VT100 keyboard preceeded |
397 by the PF1 key. GOLD is the ASCII the 7-bit escape sequence <ESC>OP.") | 397 by the PF1 key. GOLD is the ASCII the 7-bit escape sequence <ESC>OP.") |
398 | 398 |