Do not deactivate-mark if region active
This commit is contained in:
parent
8c69e43088
commit
ab6ecdedfd
1 changed files with 1 additions and 2 deletions
|
@ -472,8 +472,7 @@ Doesn't mess with special buffers."
|
|||
(defun prelude-exchange-point-and-mark ()
|
||||
"Identical to `exchange-point-and-mark' but will not activate the region."
|
||||
(interactive)
|
||||
(exchange-point-and-mark)
|
||||
(deactivate-mark nil))
|
||||
(exchange-point-and-mark (not (region-active-p))))
|
||||
|
||||
(require 'epl)
|
||||
|
||||
|
|
Loading…
Reference in a new issue