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'.
This commit is contained in:
parent
3d643fafbe
commit
e2edf81271
4 changed files with 49 additions and 33 deletions
17
exwm-core.el
17
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'.")
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue