comparison lisp/bindings.el @ 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 67390da4022e
children 696e854064c5
comparison
equal deleted inserted replaced
35163:2aa481613ac4 35164:b3365833b164
620 (define-key global-map [find] 'search-forward) 620 (define-key global-map [find] 'search-forward)
621 621
622 (define-key global-map [delete] 'backward-delete-char) 622 (define-key global-map [delete] 'backward-delete-char)
623 623
624 ;; natural bindings for terminal keycaps --- defined in X keysym order 624 ;; natural bindings for terminal keycaps --- defined in X keysym order
625 (define-key global-map [home] 'beginning-of-buffer) 625 (define-key global-map [home] 'beginning-of-line)
626 (define-key global-map [C-home] 'beginning-of-buffer)
626 (define-key global-map [M-home] 'beginning-of-buffer-other-window) 627 (define-key global-map [M-home] 'beginning-of-buffer-other-window)
627 (define-key global-map [left] 'backward-char) 628 (define-key global-map [left] 'backward-char)
628 (define-key global-map [up] 'previous-line) 629 (define-key global-map [up] 'previous-line)
629 (define-key global-map [right] 'forward-char) 630 (define-key global-map [right] 'forward-char)
630 (define-key global-map [down] 'next-line) 631 (define-key global-map [down] 'next-line)
634 (define-key global-map [C-down] 'forward-paragraph) 635 (define-key global-map [C-down] 'forward-paragraph)
635 (define-key global-map [C-prior] 'scroll-right) 636 (define-key global-map [C-prior] 'scroll-right)
636 (define-key global-map [C-next] 'scroll-left) 637 (define-key global-map [C-next] 'scroll-left)
637 (define-key global-map [M-next] 'scroll-other-window) 638 (define-key global-map [M-next] 'scroll-other-window)
638 (define-key global-map [M-prior] 'scroll-other-window-down) 639 (define-key global-map [M-prior] 'scroll-other-window-down)
639 (define-key global-map [end] 'end-of-buffer) 640 (define-key global-map [end] 'end-of-line)
641 (define-key global-map [C-end] 'end-of-buffer)
640 (define-key global-map [M-end] 'end-of-buffer-other-window) 642 (define-key global-map [M-end] 'end-of-buffer-other-window)
641 (define-key global-map [begin] 'beginning-of-buffer) 643 (define-key global-map [begin] 'beginning-of-buffer)
642 (define-key global-map [M-begin] 'beginning-of-buffer-other-window) 644 (define-key global-map [M-begin] 'beginning-of-buffer-other-window)
643 ;; (define-key global-map [select] 'function-key-error) 645 ;; (define-key global-map [select] 'function-key-error)
644 ;; (define-key global-map [print] 'function-key-error) 646 ;; (define-key global-map [print] 'function-key-error)