diff options
author | Chris Feng <chris.w.feng@gmail.com> | 2016-02-07T02·45+0800 |
---|---|---|
committer | Chris Feng <chris.w.feng@gmail.com> | 2016-02-07T02·45+0800 |
commit | e2edf81271e1a7dd148aa7386b730ae2838c2860 (patch) | |
tree | eb89d010d631444cd2ac8cce377f2724092e6a5e /exwm-core.el | |
parent | 3d643fafbe58d9b3e2dc9e864cbf05a2d911e1b2 (diff) |
Add some useful key bindings
* exwm-core.el (exwm--floating-mode-line-format, exwm--mode-line-format) (exwm-mode-map): * exwm-floating.el (exwm-floating-hide-mode-line) (exwm-floating-show-mode-line): * exwm-layout.el (exwm-layout-hide-mode-line, exwm-layout-show-mode-line) (exwm-layout-toggle-mode-line): Allow hide/show mode-line for all `exwm-mode' buffers with 'C-c M'. * exwm-config.el (exwm-config-default): Add simulation keys for 'C-d' and 'C-k'.
Diffstat (limited to 'exwm-core.el')
-rw-r--r-- | exwm-core.el | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/exwm-core.el b/exwm-core.el index 61633c9775d5..9430b43548c8 100644 --- a/exwm-core.el +++ b/exwm-core.el @@ -79,14 +79,14 @@ "Event mask set on all managed windows.") ;; Internal variables -(defvar-local exwm--id nil) ;window ID -(defvar-local exwm--container nil) ;container -(defvar-local exwm--frame nil) ;workspace frame -(defvar-local exwm--floating-frame nil) ;floating frame -(defvar-local exwm--floating-mode-line-format nil) ;save mode-line-format -(defvar-local exwm--fullscreen nil) ;used in fullscreen -(defvar-local exwm--floating-frame-position nil) ;used in fullscreen -(defvar-local exwm--fixed-size nil) ;fixed size +(defvar-local exwm--id nil) ;window ID +(defvar-local exwm--container nil) ;container +(defvar-local exwm--frame nil) ;workspace frame +(defvar-local exwm--floating-frame nil) ;floating frame +(defvar-local exwm--mode-line-format nil) ;save mode-line-format +(defvar-local exwm--fullscreen nil) ;used in fullscreen +(defvar-local exwm--floating-frame-position nil) ;used in fullscreen +(defvar-local exwm--fixed-size nil) ;fixed size (defvar-local exwm--on-KeyPress ;KeyPress event handler #'exwm-input--on-KeyPress-line-mode) ;; Properties @@ -122,6 +122,7 @@ (define-key map "\C-cm" #'exwm-floating-toggle-floating) (define-key map "\C-cq" #'exwm-input-send-next-key) (define-key map "\C-cv" #'exwm-workspace-move-window) + (define-key map "\C-cM" #'exwm-layout-toggle-mode-line) map) "Keymap for `exwm-mode'.") |