[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/exwm 1863361 02/11: Merge branch 'tumashu.github.com/ma

From: Adrián Medraño Calvo
Subject: [elpa] externals/exwm 1863361 02/11: Merge branch 'tumashu.github.com/master' into externals/exwm
Date: Sat, 13 Nov 2021 16:51:01 -0500 (EST)

branch: externals/exwm
commit 1863361674159431d09140375d14c44f17a6608d
Merge: 0368127 3d648ef
Author: Adrián Medraño Calvo <adrian@medranocalvo.com>
Commit: Adrián Medraño Calvo <adrian@medranocalvo.com>

    Merge branch 'tumashu.github.com/master' into externals/exwm
 exwm-xim.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/exwm-xim.el b/exwm-xim.el
index acf718e..86b82ed 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 
+              ;; 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))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]