mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 19:00:55 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
* 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
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/simple.el
View file

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