[elpa] externals/xelb b2334b0 2/3: Support symbol representations of ASCII in key events

[Chris Feng]

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

    Support symbol representations of ASCII in key events
    
    * xcb-keysyms.el (xcb:keysyms:event->keysym): Support converting
    events with ASCII as symbols (e.g. treating 'C-a as an alternative
    form of ?\C-a).
---
 xcb-keysyms.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/xcb-keysyms.el b/xcb-keysyms.el
index 0af89c7..69e0d75 100644
--- a/xcb-keysyms.el
+++ b/xcb-keysyms.el
@@ -604,6 +604,10 @@ Return (0 . 0) when conversion fails."
                                              xcb:keysyms:-iso-function-keys))
                    ;; ISO function keys.
                    (logior keysym #xfe00))
+                  ((and (symbolp event)
+                        (= 1 (length (symbol-name event))))
+                   ;; Symbol representations of ASCII characters.
+                   (aref (symbol-name event) 0))
                   (t
                    ;; Finally try system-specific keysyms.
                    (car (rassq event system-key-alist)))))))