[elpa] externals/xelb b1e83e8 05/10: Fix extension event number

[Chris Feng]

branch: externals/xelb
commit b1e83e8779d48fe51e235bb73f9dbc1ff1f02626
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Fix extension event number
    
    * xcb.el (xcb:-connection-filter): Add the second byte to the extension
    event number.
---
 xcb.el |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/xcb.el b/xcb.el
index a03dbb4..4cba47c 100644
--- a/xcb.el
+++ b/xcb.el
@@ -332,6 +332,9 @@ Concurrency is disabled as it breaks the orders of errors, 
replies and events."
                (when (/= 0 (logand x #x80)) ;synthetic event
                  (setq synthetic t
                        x (logand x #x7f))) ;low 7 bits is the event number
+               (when (<= 64 x 127)
+                 ;; Extension event; add the second byte.
+                 (cl-incf x (aref cache 1)))
                (setq listener
                      (plist-get (slot-value connection 'event-plist) x))
                (when listener