changeset 2586:7fe45a326a98

(global-map): Dyke out the last two event-to-function bindings. These belong in loaddefs.el or the user's .emacs, not in a terminal support package. Also do the right thing and transplant all suspend-emacs bindings to iconify-frame, rather than just C-z.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Mon, 26 Apr 1993 05:15:01 +0000
parents d22e01f5ab0c
children 1cad2ff5ab80
files lisp/term/x-win.el
diffstat 1 files changed, 1 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/x-win.el	Mon Apr 26 05:01:41 1993 +0000
+++ b/lisp/term/x-win.el	Mon Apr 26 05:15:01 1993 +0000
@@ -425,13 +425,7 @@
 
 ;;;; Function keys
 
-;; We use a different symbol to prevent
-;; doc strings from listing M-next as the preferred way to do this.
-(fset 'advertised-scroll-other-window 'scroll-other-window)
-(define-key global-map [M-next] 'scroll-other-window)
-(define-key global-map [begin] 'beginning-of-buffer)
-
-(define-key global-map "\C-z" 'iconify-frame)
+(substitute-key-definition 'suspend-emacs 'iconify-frame global-map)
 
 ;; Map certain keypad keys into ASCII characters
 ;; that people usually expect.