about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--exwm-input.el20
1 files changed, 10 insertions, 10 deletions
diff --git a/exwm-input.el b/exwm-input.el
index 097b392937c9..e34ed58734bd 100644
--- a/exwm-input.el
+++ b/exwm-input.el
@@ -53,6 +53,16 @@
 (defvar exwm-workspace--minibuffer)
 (defvar exwm-workspace--list)
 
+(defvar exwm-input--global-keys nil "Global key bindings.")
+(defvar exwm-input--global-prefix-keys nil
+  "List of prefix keys of global key bindings.")
+(defvar exwm-input-prefix-keys
+  '(?\C-c ?\C-x ?\C-u ?\C-h ?\M-x ?\M-` ?\M-& ?\M-:)
+  "List of prefix keys EXWM should forward to Emacs when in line-mode.")
+(defvar exwm-input--simulation-keys nil "Simulation keys in line-mode.")
+(defvar exwm-input--simulation-prefix-keys nil
+  "List of prefix keys of simulation keys in line-mode.")
+
 (defun exwm-input--set-focus (id)
   "Set input focus to window ID in a proper way."
   (when (exwm--id->buffer id)
@@ -333,16 +343,6 @@ This value should always be overwritten.")
         (funcall exwm--on-KeyPress obj data)
       (exwm-input--on-KeyPress-char-mode obj))))
 
-(defvar exwm-input--global-keys nil "Global key bindings.")
-(defvar exwm-input--global-prefix-keys nil
-  "List of prefix keys of global key bindings.")
-(defvar exwm-input-prefix-keys
-  '(?\C-c ?\C-x ?\C-u ?\C-h ?\M-x ?\M-` ?\M-& ?\M-:)
-  "List of prefix keys EXWM should forward to Emacs when in line-mode.")
-(defvar exwm-input--simulation-keys nil "Simulation keys in line-mode.")
-(defvar exwm-input--simulation-prefix-keys nil
-  "List of prefix keys of simulation keys in line-mode.")
-
 (defun exwm-input--update-global-prefix-keys ()
   "Update `exwm-input--global-prefix-keys'."
   (when exwm--connection