# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 735531662 0
# Node ID c8ae06bda9fa9dd9b84650f0ec3f0a8ea0071673
# Parent  2715e893d2200ac86a7f727369b861fa41b80633
(global-map): Remove function key bindings that duplicate stuff in
loaddefs.el.

diff -r 2715e893d220 -r c8ae06bda9fa lisp/term/x-win.el
--- a/lisp/term/x-win.el	Fri Apr 23 02:20:59 1993 +0000
+++ b/lisp/term/x-win.el	Fri Apr 23 02:21:02 1993 +0000
@@ -425,20 +425,11 @@
 
 ;;;; Function keys
 
-;;; Give some common function keys reasonable definitions.
-(define-key global-map [home] 'beginning-of-line)
-(define-key global-map [left] 'backward-char)
-(define-key global-map [up] 'previous-line)
-(define-key global-map [right] 'forward-char)
-(define-key global-map [down] 'next-line)
-(define-key global-map [prior] 'scroll-down)
-(define-key global-map [next] 'scroll-up)
 ;; 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 [end] 'end-of-buffer)
 
 (define-key global-map "\C-z" 'iconify-frame)