diff options
author | Gerd Moellmann <gerd@gnu.org> | 2001-01-09 13:11:34 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2001-01-09 13:11:34 +0000 |
commit | 1dfca644b586e72a2a313b4630bc6b93bd05b729 (patch) | |
tree | 9300e583879daafc5562a5ac9fd708a92b212be5 /lisp/bindings.el | |
parent | 732b9cddf4c9403f7b011737d72506572f0524c9 (diff) | |
download | emacs-1dfca644b586e72a2a313b4630bc6b93bd05b729.tar.gz |
(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.
Diffstat (limited to 'lisp/bindings.el')
-rw-r--r-- | lisp/bindings.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 4decb7a857e..6b7bb02e9b7 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -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) |