bug#11191: C-x C-x does not activate the selection anymore with cua-selection-mode

[Kim Storm <storm@cua.dk>]

On 04/09/2012 04:16 PM, Dan Nicolaescu wrote:
> You might want to do something different for cua-mode vs
> cua-selection-mode (where C-x C-x has no other problems).
>

You are right -- maybe this version suits all:

(defun cua-exchange-point-and-mark (arg)
   "Exchanges point and mark.

Don't activate the mark if `cua-enable-cua-keys` is non-nil.
Just activate the mark if a prefix argument is given.

See also `exchange-point-and-mark'."
   (interactive "P")
   (if cua-enable-cua-keys
       (if arg
       (setq mark-active t)
     (let (mark-active)
       (exchange-point-and-mark)
       (if cua--rectangle
           (cua--rectangle-corner 0))))
     (exchange-point-and-mark arg)))

Would someone pls. commit this change.
Here is a change log entry:

      * emulation/cua-base.el (cua-exchange-point-and-mark):
      Fallback to exchange-point-and-mark when cua-enable-cua-keys is nil.

Then you can also close bug #6199

Thanks
Kim