Mercurial > emacs
changeset 35164:b3365833b164
(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.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Tue, 09 Jan 2001 13:11:01 +0000 |
| parents | 2aa481613ac4 |
| children | ccd55572f429 |
| files | lisp/bindings.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bindings.el Tue Jan 09 12:05:20 2001 +0000 +++ b/lisp/bindings.el Tue Jan 09 13:11:01 2001 +0000 @@ -622,7 +622,8 @@ (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 @@ (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)