[elpa] externals/xelb e153829 23/42: Merge pull request #2 from pipcet/shift-keypad-fix

[Chris Feng]

branch: externals/xelb
commit e1538298856405c4bc5ad4a686ad9890f8b346bd
Merge: 677623a 7c194e7
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Merge pull request #2 from pipcet/shift-keypad-fix
    
    Don't assume key events are numbers; they can be symbols.
---
 xcb-keysyms.el |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/xcb-keysyms.el b/xcb-keysyms.el
index ce6e65b..7f9e5e5 100644
--- a/xcb-keysyms.el
+++ b/xcb-keysyms.el
@@ -308,6 +308,7 @@ This function returns nil when it fails to convert an 
event."
           (push 'control event))
         (when (and (/= 0 (logand mask xcb:keysyms:shift-mask))
                    ;; Emacs only set shift bit for letters
+                   (integerp (car (last event)))
                    (<= ?A (car (last event))) (>= ?Z (car (last event))))
           (push 'shift event))
         (when (and xcb:keysyms:hyper-mask