# HG changeset patch # User Richard M. Stallman # Date 739213807 0 # Node ID 7cda082508c9c602ebc238161238da205e7bf8a9 # Parent a917a964bef8f6df7c5873b03c9a6930695230cb (GOLD-prefix): Define *after* GOLD-map. diff -r a917a964bef8 -r 7cda082508c9 lisp/emulation/edt.el --- a/lisp/emulation/edt.el Fri Jun 04 07:25:58 1993 +0000 +++ b/lisp/emulation/edt.el Fri Jun 04 17:10:07 1993 +0000 @@ -390,12 +390,12 @@ (define-key lisp-mode-map "\177" edt-mode-old-lisp-delete) ;"Delete" (global-set-key "\C-j" edt-mode-old-linefeed)) ;"LineFeed" -(defalias 'GOLD-prefix GOLD-map) - (defvar GOLD-map (make-keymap) "`GOLD-map' maps the function keys on the VT100 keyboard preceeded by the PF1 key. GOLD is the ASCII the 7-bit escape sequence OP.") +(defalias 'GOLD-prefix GOLD-map) + (global-set-key [home] 'edt-beginning-of-window) (global-set-key [kp-f2] 'describe-key) (global-set-key [kp-f4] 'delete-current-line)