Mercurial > emacs
changeset 69669:5f7de9821aeb
(cua--init-rectangles): Use
cua-rectangle-mark-key instead of fixed C-return.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Sat, 25 Mar 2006 00:55:09 +0000 |
| parents | 16f8a4a89f79 |
| children | cdfc7cf7bfbe |
| files | lisp/emulation/cua-rect.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/cua-rect.el Sat Mar 25 00:55:00 2006 +0000 +++ b/lisp/emulation/cua-rect.el Sat Mar 25 00:55:09 2006 +0000 @@ -1413,8 +1413,8 @@ (cua--M/H-key cua--rectangle-keymap key cmd)) (defun cua--init-rectangles () - (define-key cua--rectangle-keymap [(control return)] 'cua-clear-rectangle-mark) - (define-key cua--region-keymap [(control return)] 'cua-toggle-rectangle-mark) + (define-key cua--rectangle-keymap cua-rectangle-mark-key 'cua-clear-rectangle-mark) + (define-key cua--region-keymap cua-rectangle-mark-key 'cua-toggle-rectangle-mark) (unless (eq cua--rectangle-modifier-key 'meta) (cua--rect-M/H-key ?\s 'cua-clear-rectangle-mark) (cua--M/H-key cua--region-keymap ?\s 'cua-toggle-rectangle-mark))