Function: cua-exchange-point-and-mark
cua-exchange-point-and-mark is an interactive and byte-compiled
function defined in cua-base.el.gz.
Signature
(cua-exchange-point-and-mark ARG)
Documentation
Exchange point and mark.
Don't activate the mark if cua-enable-cua-keys is non-nil.
Otherwise, just activate the mark if a prefix ARG is given.
See also exchange-point-and-mark.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/emulation/cua-base.el.gz
(defun cua-exchange-point-and-mark (arg)
"Exchange point and mark.
Don't activate the mark if `cua-enable-cua-keys' is non-nil.
Otherwise, just activate the mark if a prefix ARG is given.
See also `exchange-point-and-mark'."
(interactive "P")
(cond ((null cua-enable-cua-keys)
(exchange-point-and-mark arg))
(arg
(when (mark t) (setq mark-active t)))
(t
(let (mark-active)
(exchange-point-and-mark)
(if cua--rectangle
(cua--rectangle-corner 0))))))