summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2023-04-07 18:31:42 +0300
committerEli Zaretskii <eliz@gnu.org>2023-04-07 18:31:42 +0300
commitcb8c87a423a4897d873180a9e9be99e2ec20488d (patch)
treede4a182ca8194900d5cb950750d301b329998a50 /lisp
parent305246d9726bbe05a65ad3836880138db5c01dfa (diff)
downloademacs-cb8c87a423a4897d873180a9e9be99e2ec20488d.tar.gz
Allow active region when IM is used
* lisp/international/quail.el (quail-minibuffer-message): Bind deactivate-mark to allow setting active region in the minibuffer when an input method is used. (Bug#62709)
Diffstat (limited to 'lisp')
-rw-r--r--lisp/international/quail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 2ffe3392335..317ea8495de 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1995,7 +1995,8 @@ Remaining args are for FUNC."
(defun quail-minibuffer-message (string)
(message nil)
(let ((point-max (point-max))
- (inhibit-quit t))
+ (inhibit-quit t)
+ (deactivate-mark nil))
(save-excursion
(goto-char point-max)
(insert string))