about summary refs log tree commit diff
diff options
context:
space:
mode:
-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)