about summary refs log tree commit diff
path: root/exwm-xim.el
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2019-08-25T00·00+0000
committerChris Feng <chris.w.feng@gmail.com>2019-08-25T00·00+0000
commitddc22f2feddd99ff488f5f1c03b4f059e353056a (patch)
tree41e2c18c4a556147c62b57ca90864ba5fecba5b8 /exwm-xim.el
parent5505cff826b361d5d0090a6314891005595e3279 (diff)
Clear echo area for input methods
* exwm-xim.el (exwm-xim--handle-forward-event-request): exwm-xim
enforces `input-method-use-echo-area' but this breaks some input
methods.  This change clear garbage printed by such input methods.
Diffstat (limited to 'exwm-xim.el')
-rw-r--r--exwm-xim.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/exwm-xim.el b/exwm-xim.el
index dc22f82fc4b1..5530c87c1460 100644
--- a/exwm-xim.el
+++ b/exwm-xim.el
@@ -588,6 +588,8 @@ The actual XIM request is in client message data or a property."
               ;; Always show key strokes.
               (let ((input-method-use-echo-area t))
                 (setq result (funcall im-func event))
+                ;; Clear echo area for the input method.
+                (message nil)
                 ;; This also works for portable character encoding.
                 (setq result
                       (encode-coding-string (concat result)