Fix several keybindings in wm library
This commit is contained in:
parent
126089a48e
commit
53c4c7da1e
|
@ -19,8 +19,8 @@
|
||||||
|
|
||||||
|
|
||||||
(defun disable-nlinum ()
|
(defun disable-nlinum ()
|
||||||
"Disables nlinum and fringe-mode."
|
"Disable nlinum and fringe-mode."
|
||||||
(fringe-mode 1)
|
(fringe-mode -1)
|
||||||
(nlinum-mode -1))
|
(nlinum-mode -1))
|
||||||
|
|
||||||
|
|
||||||
|
@ -106,38 +106,37 @@
|
||||||
;; `exwm-mode-map'. The following example shortens 'C-c q' to 'C-q'.
|
;; `exwm-mode-map'. The following example shortens 'C-c q' to 'C-q'.
|
||||||
(define-key exwm-mode-map [?\C-q] #'exwm-input-send-next-key)
|
(define-key exwm-mode-map [?\C-q] #'exwm-input-send-next-key)
|
||||||
|
|
||||||
|
(push ?\C-c exwm-input-prefix-keys)
|
||||||
|
|
||||||
;; The following example demonstrates how to use simulation keys to mimic
|
;; The following example demonstrates how to use simulation keys to mimic
|
||||||
;; the behavior of Emacs. The value of `exwm-input-simulation-keys` is a
|
;; the behavior of Emacs. The value of `exwm-input-simulation-keys` is a
|
||||||
;; list of cons cells (SRC . DEST), where SRC is the key sequence you press
|
;; list of cons cells (SRC . DEST), where SRC is the key sequence you press
|
||||||
;; and DEST is what EXWM actually sends to application. Note that both SRC
|
;; and DEST is what EXWM actually sends to application. Note that both SRC
|
||||||
;; and DEST should be key sequences (vector or string).
|
;; and DEST should be key sequences (vector or string).
|
||||||
(setq exwm-input-simulation-keys
|
(setq exwm-input-simulation-keys
|
||||||
'(
|
`(
|
||||||
;; movement
|
;; movement
|
||||||
([?\C-b] . [left])
|
(,(kbd "C-b") . left)
|
||||||
([?\M-b] . [C-left])
|
(,(kbd "M-b") . ,(kbd "C-<left>"))
|
||||||
([?\C-f] . [right])
|
(,(kbd "C-f") . right)
|
||||||
([?\M-f] . [C-right])
|
(,(kbd "M-f") . ,(kbd "C-<right>"))
|
||||||
([?\C-p] . [up])
|
(,(kbd "C-p") . up)
|
||||||
([?\C-n] . [down])
|
(,(kbd "C-n") . down)
|
||||||
([?\C-a] . [home])
|
(,(kbd "C-a") . home)
|
||||||
([?\C-e] . [end])
|
(,(kbd "C-e") . end)
|
||||||
([?\M-v] . [prior])
|
(,(kbd "M-v") . prior)
|
||||||
([?\C-v] . [next])
|
(,(kbd "C-v") . next)
|
||||||
([?\C-d] . [delete])
|
(,(kbd "C-d") . delete)
|
||||||
([?\C-k] . [S-end delete])
|
;;(,(kbs "C-k") . [S-end delete])
|
||||||
;; navigation
|
;; navigation
|
||||||
([?\C-c b] . [\M-left])
|
(,(kbd "C-c b") . ,(kbd "M-<left>"))
|
||||||
([?\C-c f] . [\M-right])
|
(,(kbd "C-c f") . ,(kbd "M-<right>"))
|
||||||
|
(,(kbd "C-c w") . ,(kbd "C-w"))
|
||||||
;; Actions
|
(,(kbd "C-w") . ,(kbd "C-x"))
|
||||||
([?\C-c w] . [\C-w])
|
(,(kbd "M-w") . ,(kbd "C-c"))
|
||||||
;; cut/paste.
|
(,(kbd "C-y") . ,(kbd "C-v"))
|
||||||
([?\C-w] . [?\C-x])
|
|
||||||
([?\M-w] . [?\C-c])
|
|
||||||
([?\C-y] . [?\C-v])
|
|
||||||
;; search
|
;; search
|
||||||
([?\C-s] . [?\C-f])))
|
(,(kbd "C-s") . ,(kbd "C-f"))))
|
||||||
|
|
||||||
;; You can hide the minibuffer and echo area when they're not used, by
|
;; You can hide the minibuffer and echo area when they're not used, by
|
||||||
;; uncommenting the following line.
|
;; uncommenting the following line.
|
||||||
|
|
Loading…
Reference in New Issue