From 23cf5d43d8fdd913eec46af1b4f08499ec13bfc0 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Wed, 19 Aug 2020 12:27:15 +0100 Subject: [PATCH] Centralize in normal mode KBDs Merging keybinding and wpc-keybindings step-by-step... --- emacs/.emacs.d/wpc/keybindings.el | 43 +++++++++++++++++---------- emacs/.emacs.d/wpc/wpc-keybindings.el | 30 ------------------- 2 files changed, 28 insertions(+), 45 deletions(-) diff --git a/emacs/.emacs.d/wpc/keybindings.el b/emacs/.emacs.d/wpc/keybindings.el index cdc99af55..7a1805ac5 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 diff --git a/emacs/.emacs.d/wpc/wpc-keybindings.el b/emacs/.emacs.d/wpc/wpc-keybindings.el index 69a5b9526..fa6ba0003 100644 --- a/emacs/.emacs.d/wpc/wpc-keybindings.el +++ b/emacs/.emacs.d/wpc/wpc-keybindings.el @@ -91,36 +91,6 @@ ;; kbds for magit is with `evil-magit'. (use-package evil-magit) -;; TODO: Consider moving this to another module. -(general-define-key - :prefix "" - :states '(normal) - "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) - ;; create comments easily (use-package evil-commentary :after (evil)