[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 19c6cad182: Fix "C-SPC C-SPC" after "C-x C-x"
From: |
Eli Zaretskii |
Subject: |
master 19c6cad182: Fix "C-SPC C-SPC" after "C-x C-x" |
Date: |
Fri, 7 Jan 2022 13:31:34 -0500 (EST) |
branch: master
commit 19c6cad1821eb896b2ddd0f6eab030f0880ea254
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
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)
---
lisp/simple.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 070d2764fe..cbcde9fb8d 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -6664,7 +6664,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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 19c6cad182: Fix "C-SPC C-SPC" after "C-x C-x",
Eli Zaretskii <=