Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

(global-map): Bind <home> to beginning-of-line,

Browse source 
<end> to end-of-line, C-<home> to beginning-of-buffer, and
C-<end> to end-of-buffer.
This commit is contained in:
Gerd Moellmann 2001-01-09 13:11:34 +00:00
parent 732b9cddf4
commit 1dfca644b5
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View 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.

6
lisp/bindings.el
View 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)