Make CUA-mode use shift-select-mode.
authorStefan Monnier <monnier@iro.umontreal.ca>
Sun, 8 Dec 2013 08:11:50 +0000 (03:11 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Sun, 8 Dec 2013 08:11:50 +0000 (03:11 -0500)
commit27262e39e6a1da5db8cf0735615193efc49b9ad7
tree8e375be0a22aeb7bd0f22ea897064a9aadb5e778
parente9551b12f8c17876a32e1cd075c83af3e7950980
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