comparison lisp/emulation/cua-rect.el @ 107853:de5ba6f3514c

Bind `C-v' to `scroll-up-command' and `M-v' to `scroll-down-command'. http://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00403.html * window.c (keys_of_window): Rebind `C-v' from `scroll-up' to `scroll-up-command' and `M-v' from `scroll-down' to `scroll-down-command'. * tutorial.el (tutorial--default-keys): Rebind `C-v' to `scroll-up-command' and `M-v' to `scroll-down-command'. * emulation/cua-rect.el (cua--init-rectangles): * forms.el (forms--change-commands): * image-mode.el (image-mode-map): Remap scroll-down-command and scroll-up-command in addition to scroll-down and scroll-up.
author Juri Linkov <juri@jurta.org>
date Wed, 14 Apr 2010 03:33:32 +0300
parents 1d1d5d9bd884
children 114b70461f96
comparison
equal deleted inserted replaced
107852:4abde609aac9 107853:de5ba6f3514c
1430 (define-key cua--rectangle-keymap [remap beginning-of-line] 'cua-resize-rectangle-bol) 1430 (define-key cua--rectangle-keymap [remap beginning-of-line] 'cua-resize-rectangle-bol)
1431 (define-key cua--rectangle-keymap [remap end-of-buffer] 'cua-resize-rectangle-bot) 1431 (define-key cua--rectangle-keymap [remap end-of-buffer] 'cua-resize-rectangle-bot)
1432 (define-key cua--rectangle-keymap [remap beginning-of-buffer] 'cua-resize-rectangle-top) 1432 (define-key cua--rectangle-keymap [remap beginning-of-buffer] 'cua-resize-rectangle-top)
1433 (define-key cua--rectangle-keymap [remap scroll-down] 'cua-resize-rectangle-page-up) 1433 (define-key cua--rectangle-keymap [remap scroll-down] 'cua-resize-rectangle-page-up)
1434 (define-key cua--rectangle-keymap [remap scroll-up] 'cua-resize-rectangle-page-down) 1434 (define-key cua--rectangle-keymap [remap scroll-up] 'cua-resize-rectangle-page-down)
1435 (define-key cua--rectangle-keymap [remap scroll-down-command] 'cua-resize-rectangle-page-up)
1436 (define-key cua--rectangle-keymap [remap scroll-up-command] 'cua-resize-rectangle-page-down)
1435 1437
1436 (define-key cua--rectangle-keymap [remap delete-backward-char] 'cua-delete-char-rectangle) 1438 (define-key cua--rectangle-keymap [remap delete-backward-char] 'cua-delete-char-rectangle)
1437 (define-key cua--rectangle-keymap [remap backward-delete-char] 'cua-delete-char-rectangle) 1439 (define-key cua--rectangle-keymap [remap backward-delete-char] 'cua-delete-char-rectangle)
1438 (define-key cua--rectangle-keymap [remap backward-delete-char-untabify] 'cua-delete-char-rectangle) 1440 (define-key cua--rectangle-keymap [remap backward-delete-char-untabify] 'cua-delete-char-rectangle)
1439 (define-key cua--rectangle-keymap [remap self-insert-command] 'cua-insert-char-rectangle) 1441 (define-key cua--rectangle-keymap [remap self-insert-command] 'cua-insert-char-rectangle)