From 23cf5d43d8fdd913eec46af1b4f08499ec13bfc0 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Wed, 19 Aug 2020 12:27:15 +0100 Subject: Centralize in normal mode KBDs Merging keybinding and wpc-keybindings step-by-step... --- emacs/.emacs.d/wpc/keybindings.el | 43 +++++++++++++++++++++++++-------------- 1 file changed, 28 insertions(+), 15 deletions(-) (limited to 'emacs/.emacs.d/wpc/keybindings.el') diff --git a/emacs/.emacs.d/wpc/keybindings.el b/emacs/.emacs.d/wpc/keybindings.el index cdc99af557ca..7a1805ac5594 100644 --- a/emacs/.emacs.d/wpc/keybindings.el +++ b/emacs/.emacs.d/wpc/keybindings.el @@ -32,25 +32,46 @@ `(exwm-input-set-key (kbd ,c) ,fn)) (keybinding/exwm "C-M-v" #'ivy-clipmenu/copy) - (keybinding/exwm "" #'screen-brightness/increase) (keybinding/exwm "" #'screen-brightness/decrease) - (keybinding/exwm "" #'pulse-audio/toggle-mute) (keybinding/exwm "" #'pulse-audio/decrease-volume) (keybinding/exwm "" #'pulse-audio/increase-volume) (keybinding/exwm "" #'pulse-audio/toggle-microphone) - (keybinding/exwm "C-M-c" #'chrome/browse) - (keybinding/exwm (kbd/raw 'x11 "s") #'scrot/select) - (keybinding/exwm "" #'exwm/switch-to-exwm-buffer) (general-define-key :prefix "" :states '(normal) - "." #'ffap) + "." #'ffap + "gn" #'notmuch + "i" #'counsel-semantic-or-imenu + "I" #'ibuffer + "hk" #'helpful-callable + "hf" #'helpful-function + "hm" #'helpful-macro + "hc" #'helpful-command + "hk" #'helpful-key + "hv" #'helpful-variable + "hp" #'helpful-at-point + "s" #'flyspell-mode + "S" #'sort-lines + "=" #'align + "p" #'flycheck-previous-error + "f" #'project-find-file + "n" #'flycheck-next-error + "N" #'smerge-next + "W" #'balance-windows + "gs" #'magit-status + "E" #'refine + "es" #'wpc/create-snippet + "l" #'linum-mode + "B" #'magit-blame + "w" #'save-buffer + "r" #'wpc/evil-replace-under-point + "R" #'deadgrep) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Vterm @@ -84,10 +105,7 @@ :prefix "" :states '(normal) "d0" #'display/disable-laptop - "d1" #'display/enable-laptop) - (general-define-key - :prefix "" - :states '(normal) + "d1" #'display/enable-laptop "D0" #'display/disable-4k "D1" #'display/enable-4k)) @@ -144,10 +162,5 @@ (notmuch-search-tag '("-inbox" "-action" "-review" "+waiting"))) "e" #'notmuch-search-archive-thread) -(general-define-key - :states '(normal) - :prefix "" - "gn" #'notmuch) - (provide 'keybindings) ;;; keybindings.el ends here -- cgit 1.4.1