1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 02:50:26 -08:00

Fix "C-SPC C-SPC" after "C-x C-x"

* lisp/simple.el (exchange-point-and-mark): Fix what the command
does when 'transient-mark-mode' is OFF.  (Bug#52896)

(cherry picked from commit 19c6cad182)
This commit is contained in:
Eli Zaretskii 2022-01-07 20:30:17 +02:00
parent 29085a668e
commit 2289a7a271

View file

@ -6652,7 +6652,7 @@ mode temporarily."
(user-error "No mark set in this buffer"))
(set-mark (point))
(goto-char omark)
(cond (temp-highlight
(cond ((and (not arg) (not temp-highlight))
(setq-local transient-mark-mode (cons 'only transient-mark-mode)))
((xor arg (not (region-active-p)))
(deactivate-mark))