about summary refs log tree commit diff
path: root/exwm-input.el
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2017-12-10T09·58+0800
committerChris Feng <chris.w.feng@gmail.com>2017-12-10T09·58+0800
commita145445da675ca36f533d742ad7ff05f7f5ec127 (patch)
tree8502180f5729e64f7e06cc76ac006827f6d99591 /exwm-input.el
parent2b183f221239a24da8d65cb9043f1010aa14c640 (diff)
; Eliminate a compilation warning.
Diffstat (limited to 'exwm-input.el')
-rw-r--r--exwm-input.el20
1 files changed, 10 insertions, 10 deletions
diff --git a/exwm-input.el b/exwm-input.el
index 097b392937..e34ed58734 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