]> git.eshelyaron.com Git - emacs.git/commitdiff
(global-map): Bind <home> to beginning-of-line,
authorGerd Moellmann <gerd@gnu.org>
Tue, 9 Jan 2001 13:11:34 +0000 (13:11 +0000)
committerGerd Moellmann <gerd@gnu.org>
Tue, 9 Jan 2001 13:11:34 +0000 (13:11 +0000)
<end> to end-of-line, C-<home> to beginning-of-buffer, and
C-<end> to end-of-buffer.

lisp/ChangeLog
lisp/bindings.el

index c543ca968d60c466b4217e3cd88a5d470808942e..64789b66e052107412aacc24b22fc054f93699cb 100644 (file)
@@ -1,5 +1,9 @@
 2001-01-09  Gerd Moellmann  <gerd@gnu.org>
 
+       * bindings.el (global-map): Bind <home> to beginning-of-line,
+       <end> to end-of-line, C-<home> to beginning-of-buffer, and
+       C-<end> to end-of-buffer.
+
        * language/european.el: Add Dutch and Spanish language info
        to be able to use the appropriate tutorials.
 
index 4decb7a857e1127f15cf55e92c6b6cd5ec56d59e..6b7bb02e9b7e3b0e4672d9e8c804f5abb3709876 100644 (file)
@@ -622,7 +622,8 @@ language you are using."
 (define-key global-map [delete] 'backward-delete-char)
 
 ;; natural bindings for terminal keycaps --- defined in X keysym order
-(define-key global-map [home]          'beginning-of-buffer)
+(define-key global-map [home]          'beginning-of-line)
+(define-key global-map [C-home]                'beginning-of-buffer)
 (define-key global-map [M-home]                'beginning-of-buffer-other-window)
 (define-key global-map [left]          'backward-char)
 (define-key global-map [up]            'previous-line)
@@ -636,7 +637,8 @@ language you are using."
 (define-key global-map [C-next]                'scroll-left)
 (define-key global-map [M-next]                'scroll-other-window)
 (define-key global-map [M-prior]       'scroll-other-window-down)
-(define-key global-map [end]           'end-of-buffer)
+(define-key global-map [end]           'end-of-line)
+(define-key global-map [C-end]         'end-of-buffer)
 (define-key global-map [M-end]         'end-of-buffer-other-window)
 (define-key global-map [begin]         'beginning-of-buffer)
 (define-key global-map [M-begin]       'beginning-of-buffer-other-window)