From 7c9bc5d6d0df211a124878498179e12d26e23323 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Adri=C3=A1n=20Medra=C3=B1o=20Calvo?=
<adrian@medranocalvo.com>
Date: Mon, 5 Mar 2018 00:00:00 +0000
Subject: [PATCH] Support disabling default `exwm-mode-map' bindings
* exwm-input.el (exwm-input--on-KeyPress-line-mode): Use
`lookup-key' to check whether a the event is defined in the
`exwm-mode-map' keymap.
---
exwm-input.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/exwm-input.el b/exwm-input.el
index e051603..1dd0099 100644
--- a/exwm-input.el
+++ b/exwm-input.el
@@ -566,7 +566,7 @@ instead."
;;
(memq event exwm-input--global-prefix-keys)
(memq event exwm-input-prefix-keys)
- (assq event (cdr exwm-mode-map))
+ (lookup-key exwm-mode-map (vector event))
(gethash event exwm-input--simulation-keys)))
(setq mode xcb:Allow:AsyncKeyboard)
(exwm-input--cache-event event))