diff options
| author | Adrián Medraño Calvo <adrian@medranocalvo.com> | 2021-10-30T00·00+0000 |
|---|---|---|
| committer | Adrián Medraño Calvo <adrian@medranocalvo.com> | 2021-10-30T00·00+0000 |
| commit | 52a0b1c5561c5bc8240bb2ea271e55659aff3981 (patch) | |
| tree | 85f9f786b1bcf558d007e63e2c60fcfc268bc0fa /exwm-xim.el | |
| parent | deabe9c2df0333a45b7dafbad1ad11b99e178d04 (diff) | |
| parent | 3d648ef1c4a754ad89083868190b8e982568b6f5 (diff) | |
Merge branch 'tumashu.github.com/master' into externals/exwm
Diffstat (limited to 'exwm-xim.el')
| -rw-r--r-- | exwm-xim.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/exwm-xim.el b/exwm-xim.el index 4bc084a73b..9589648d22 100644 --- a/exwm-xim.el +++ b/exwm-xim.el @@ -161,6 +161,10 @@ C,no" (defvar exwm-xim--_XIM_PROTOCOL nil) (defvar exwm-xim--_XIM_XCONNECT nil) +(defvar exwm-xim-buffer-p nil + "Whether current buffer is used by exwm-xim.") +(make-variable-buffer-local 'exwm-xim-buffer-p) + (defun exwm-xim--on-SelectionRequest (data _synthetic) "Handle SelectionRequest events on IMS window. @@ -585,6 +589,9 @@ The actual XIM request is in client message data or a property." (exwm-input--grab-keyboard)) (unwind-protect (with-temp-buffer + ;; This variable is used to test whether exwm-xim is enabled. + ;; Used by e.g. pyim-probe. + (setq-local exwm-xim-buffer-p t) ;; Always show key strokes. (let ((input-method-use-echo-area t) (exwm-input-line-mode-passthrough t)) |