[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/bindings.el
From: |
Andreas Schwab |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/bindings.el |
Date: |
Sat, 11 Jun 2005 03:13:33 -0400 |
Index: emacs/lisp/bindings.el
diff -c emacs/lisp/bindings.el:1.146 emacs/lisp/bindings.el:1.147
*** emacs/lisp/bindings.el:1.146 Mon May 23 11:19:17 2005
--- emacs/lisp/bindings.el Sat Jun 11 07:13:33 2005
***************
*** 751,756 ****
--- 751,757 ----
(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 esc-map [home] 'beginning-of-buffer-other-window)
(define-key global-map [left] 'backward-char)
(define-key global-map [up] 'previous-line)
(define-key global-map [right] 'forward-char)
***************
*** 763,775 ****
--- 764,780 ----
(put 'scroll-left 'disabled t)
(define-key global-map [C-next] 'scroll-left)
(define-key global-map [M-next] 'scroll-other-window)
+ (define-key esc-map [next] 'scroll-other-window)
(define-key global-map [M-prior] 'scroll-other-window-down)
+ (define-key esc-map [prior] 'scroll-other-window-down)
(define-key esc-map [?\C-\S-v] 'scroll-other-window-down)
(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 esc-map [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)
+ (define-key esc-map [begin]
'beginning-of-buffer-other-window)
;; (define-key global-map [select] 'function-key-error)
;; (define-key global-map [print] 'function-key-error)
(define-key global-map [execute] 'execute-extended-command)
***************
*** 933,939 ****
--- 938,946 ----
(define-key global-map "\C-c" 'mode-specific-command-prefix)
(global-set-key [M-right] 'forward-word)
+ (define-key esc-map [right] 'forward-word)
(global-set-key [M-left] 'backward-word)
+ (define-key esc-map [left] 'backward-word)
;; address@hidden says these bindings are standard on PC editors.
(global-set-key [C-right] 'forward-word)
(global-set-key [C-left] 'backward-word)
***************
*** 943,954 ****
;; This is "move to the clipboard", or as close as we come.
(global-set-key [S-delete] 'kill-region)
! (global-set-key [C-M-left] 'backward-sexp)
! (global-set-key [C-M-right] 'forward-sexp)
! (global-set-key [C-M-up] 'backward-up-list)
! (global-set-key [C-M-down] 'down-list)
! (global-set-key [C-M-home] 'beginning-of-defun)
! (global-set-key [C-M-end] 'end-of-defun)
(define-key esc-map "\C-f" 'forward-sexp)
(define-key esc-map "\C-b" 'backward-sexp)
--- 950,967 ----
;; This is "move to the clipboard", or as close as we come.
(global-set-key [S-delete] 'kill-region)
! (global-set-key [C-M-left] 'backward-sexp)
! (define-key esc-map [C-left] 'backward-sexp)
! (global-set-key [C-M-right] 'forward-sexp)
! (define-key esc-map [C-right] 'forward-sexp)
! (global-set-key [C-M-up] 'backward-up-list)
! (define-key esc-map [C-up] 'backward-up-list)
! (global-set-key [C-M-down] 'down-list)
! (define-key esc-map [C-down] 'down-list)
! (global-set-key [C-M-home] 'beginning-of-defun)
! (define-key esc-map [C-home] 'beginning-of-defun)
! (global-set-key [C-M-end] 'end-of-defun)
! (define-key esc-map [C-end] 'end-of-defun)
(define-key esc-map "\C-f" 'forward-sexp)
(define-key esc-map "\C-b" 'backward-sexp)
- [Emacs-diffs] Changes to emacs/lisp/bindings.el,
Andreas Schwab <=