Make CUA-mode use shift-select-mode.
commitcfa798ab6e4dcb4ddd2541c1ddb77e35a9cedfed
authorStefan Monnier <monnier@iro.umontreal.ca>
Sun, 8 Dec 2013 08:11:50 +0000 (8 03:11 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Sun, 8 Dec 2013 08:11:50 +0000 (8 03:11 -0500)
tree4d429c8b64b780a50b5a8370724165b2e56474ac
parentc46c57969429a2e6b6de943976f4202554317a72
Make CUA-mode use shift-select-mode.
* lisp/emulation/cua-base.el (cua--explicit-region-start)
(cua--last-region-shifted): Remove.
(cua--deactivate): Use deactivate-mark.
(cua--pre-command-handler-1): Don't handle shift-selection.
(cua--post-command-handler-1): Don't change transient-mark-mode.
(cua--select-keymaps): Use region-active-p rather than
cua--explicit-region-start or cua--last-region-shifted.
(cua-mode): Enable shift-select-mode.
* lisp/emulation/cua-rect.el (cua--rectangle-highlight-for-redisplay):
New function.
(redisplay-highlight-region-function): Use it.
lisp/ChangeLog
lisp/emulation/cua-base.el
lisp/emulation/cua-rect.el