873 lines
38 KiB
EmacsLisp
873 lines
38 KiB
EmacsLisp
;;; config/default/+bindings.el -*- lexical-binding: t; -*-
|
|
|
|
;; This file defines a Spacemacs-esque keybinding scheme
|
|
|
|
;; expand-region's prompt can't tell what key contract-region is bound to, so we
|
|
;; tell it explicitly.
|
|
(setq expand-region-contract-fast-key "V")
|
|
|
|
;;
|
|
(map! [remap evil-jump-to-tag] #'projectile-find-tag
|
|
[remap find-tag] #'projectile-find-tag
|
|
|
|
;; Ensure there are no conflicts
|
|
:nmvo doom-leader-key nil
|
|
:nmvo doom-localleader-key nil
|
|
|
|
;; Swap RET/C-j in insert mode
|
|
:i [remap newline] #'newline-and-indent
|
|
:i "C-j" #'+default/newline
|
|
|
|
;; --- Global keybindings ---------------------------
|
|
;; Make M-x available everywhere
|
|
:gnvime "M-x" #'execute-extended-command
|
|
:gnvime "A-x" #'execute-extended-command
|
|
|
|
;; A little sandbox to run code in
|
|
:gnvime "M-;" #'eval-expression
|
|
|
|
;; Text-scaling
|
|
:n "M-+" (λ! (text-scale-set 0))
|
|
:n "M-=" #'text-scale-increase
|
|
:n "M--" #'text-scale-decrease
|
|
|
|
;; Simple window/frame navigation/manipulation
|
|
:n "C-`" #'+popup/toggle
|
|
:n "C-~" #'+popup/raise
|
|
:n "M-t" #'+workspace/new
|
|
:n "M-T" #'+workspace/display
|
|
:n "M-w" #'delete-window
|
|
:n "M-W" #'delete-frame
|
|
:n "C-M-f" #'toggle-frame-fullscreen
|
|
:n "M-n" #'evil-buffer-new
|
|
:n "M-N" #'make-frame
|
|
:n "M-1" (λ! (+workspace/switch-to 0))
|
|
:n "M-2" (λ! (+workspace/switch-to 1))
|
|
:n "M-3" (λ! (+workspace/switch-to 2))
|
|
:n "M-4" (λ! (+workspace/switch-to 3))
|
|
:n "M-5" (λ! (+workspace/switch-to 4))
|
|
:n "M-6" (λ! (+workspace/switch-to 5))
|
|
:n "M-7" (λ! (+workspace/switch-to 6))
|
|
:n "M-8" (λ! (+workspace/switch-to 7))
|
|
:n "M-9" (λ! (+workspace/switch-to 8))
|
|
:n "M-0" #'+workspace/switch-to-last
|
|
|
|
;; Other sensible, textmate-esque global bindings
|
|
:n "M-r" #'+eval/buffer
|
|
:n "M-R" #'+eval/region-and-replace
|
|
:n "M-b" #'+default/compile
|
|
:n "M-a" #'mark-whole-buffer
|
|
:n "M-c" #'evil-yank
|
|
:n "M-q" (if (daemonp) #'delete-frame #'evil-quit-all)
|
|
(:when (featurep! :completion helm)
|
|
:n "M-f" #'swiper-helm)
|
|
(:when (featurep! :completion ivy)
|
|
:n "M-f" #'swiper)
|
|
:n "M-s" #'save-buffer
|
|
:m "A-j" #'+default:multi-next-line
|
|
:m "A-k" #'+default:multi-previous-line
|
|
:nv "C-SPC" #'+evil:fold-toggle
|
|
:gnvimr "M-v" #'clipboard-yank
|
|
;; Easier window navigation
|
|
:en "C-h" #'evil-window-left
|
|
:en "C-j" #'evil-window-down
|
|
:en "C-k" #'evil-window-up
|
|
:en "C-l" #'evil-window-right
|
|
|
|
"C-x p" #'+popup/other
|
|
(:when IS-MAC
|
|
"M-`" #'other-frame)
|
|
|
|
|
|
;; --- Personal vim-esque bindings ------------------
|
|
:nv "K" #'+lookup/documentation
|
|
:n "zx" #'kill-this-buffer
|
|
:n "ZX" #'bury-buffer
|
|
:m "]a" #'evil-forward-arg
|
|
:m "[a" #'evil-backward-arg
|
|
:n "]b" #'next-buffer
|
|
:n "[b" #'previous-buffer
|
|
:n "]w" #'+workspace/switch-right
|
|
:n "[w" #'+workspace/switch-left
|
|
:m "gt" #'+workspace/switch-right
|
|
:m "gT" #'+workspace/switch-left
|
|
:m "gd" #'+lookup/definition
|
|
:m "gD" #'+lookup/references
|
|
:n "gf" #'+lookup/file
|
|
:n "gQ" #'+format:region
|
|
:n "gp" #'+evil/reselect-paste
|
|
:v "gp" #'+evil/paste-preserve-register
|
|
:n "gr" #'+eval:region
|
|
:n "gR" #'+eval/buffer
|
|
:v "gR" #'+eval:replace-region
|
|
:v "@" #'+evil:apply-macro
|
|
:n "g@" #'+evil:apply-macro
|
|
;; repeat in visual mode (FIXME buggy)
|
|
:v "." #'evil-repeat
|
|
;; don't leave visual mode after shifting
|
|
:v "<" #'+evil/visual-dedent ; vnoremap < <gv
|
|
:v ">" #'+evil/visual-indent ; vnoremap > >gv
|
|
|
|
:nv "C-a" #'evil-numbers/inc-at-pt
|
|
:nv "C-S-a" #'evil-numbers/dec-at-pt
|
|
|
|
|
|
;; --- Plugin bindings ------------------------------
|
|
;; auto-yasnippet
|
|
:i [C-tab] #'aya-expand
|
|
:nv [C-tab] #'aya-create
|
|
|
|
;; company-mode (vim-like omnicompletion)
|
|
:i "C-@" #'+company/complete
|
|
:i "C-SPC" #'+company/complete
|
|
(:prefix "C-x"
|
|
:i "C-l" #'+company/whole-lines
|
|
:i "C-k" #'+company/dict-or-keywords
|
|
:i "C-f" #'company-files
|
|
:i "C-]" #'company-etags
|
|
:i "s" #'company-ispell
|
|
:i "C-s" #'company-yasnippet
|
|
:i "C-o" #'company-capf
|
|
:i "C-n" #'+company/dabbrev
|
|
:i "C-p" #'+company/dabbrev-code-previous)
|
|
(:after company
|
|
(:map company-active-map
|
|
;; Don't interfere with `evil-delete-backward-word' in insert mode
|
|
"C-w" nil
|
|
"C-n" #'company-select-next
|
|
"C-p" #'company-select-previous
|
|
"C-j" #'company-select-next
|
|
"C-k" #'company-select-previous
|
|
"C-h" #'company-show-doc-buffer
|
|
"C-u" #'company-previous-page
|
|
"C-d" #'company-next-page
|
|
"C-s" #'company-filter-candidates
|
|
(:when (featurep! :completion helm)
|
|
"C-S-s" #'helm-company)
|
|
(:when (featurep! :completion ivy)
|
|
"C-S-s" #'counsel-company)
|
|
"C-SPC" #'company-complete-common
|
|
[tab] #'company-complete-common-or-cycle
|
|
[backtab] #'company-select-previous)
|
|
;; Automatically applies to `company-filter-map'
|
|
(:map company-search-map
|
|
"C-n" #'company-select-next-or-abort
|
|
"C-p" #'company-select-previous-or-abort
|
|
"C-j" #'company-select-next-or-abort
|
|
"C-k" #'company-select-previous-or-abort
|
|
"C-s" (λ! (company-search-abort) (company-filter-candidates))
|
|
[escape] #'company-search-abort))
|
|
|
|
;; counsel
|
|
(:when (featurep! :completion ivy)
|
|
(:after counsel
|
|
(:map counsel-ag-map
|
|
[backtab] #'+ivy/wgrep-occur ; search/replace on results
|
|
"C-SPC" #'ivy-call-and-recenter ; preview
|
|
"M-RET" (+ivy-do-action! #'+ivy-git-grep-other-window-action))))
|
|
|
|
;; easymotion
|
|
:m "gs" #'+evil/easymotion ; lazy-load `evil-easymotion'
|
|
(:after evil-easymotion
|
|
:map evilem-map
|
|
"a" (evilem-create #'evil-forward-arg)
|
|
"A" (evilem-create #'evil-backward-arg)
|
|
"s" (evilem-create #'evil-snipe-repeat
|
|
:name 'evil-easymotion-snipe-forward
|
|
:pre-hook (save-excursion (call-interactively #'evil-snipe-s))
|
|
:bind ((evil-snipe-scope 'buffer)
|
|
(evil-snipe-enable-highlight)
|
|
(evil-snipe-enable-incremental-highlight)))
|
|
"S" (evilem-create #'evil-snipe-repeat
|
|
:name 'evil-easymotion-snipe-backward
|
|
:pre-hook (save-excursion (call-interactively #'evil-snipe-S))
|
|
:bind ((evil-snipe-scope 'buffer)
|
|
(evil-snipe-enable-highlight)
|
|
(evil-snipe-enable-incremental-highlight)))
|
|
"SPC" #'avy-goto-char-timer
|
|
"/" (evilem-create #'evil-ex-search-next
|
|
:pre-hook (save-excursion (call-interactively #'evil-ex-search-forward))
|
|
:bind ((evil-search-wrap)))
|
|
"?" (evilem-create #'evil-ex-search-previous
|
|
:pre-hook (save-excursion (call-interactively #'evil-ex-search-backward))
|
|
:bind ((evil-search-wrap))))
|
|
|
|
;; evil
|
|
(:after evil
|
|
:textobj "x" #'evil-inner-xml-attr #'evil-outer-xml-attr
|
|
:textobj "a" #'evil-inner-arg #'evil-outer-arg
|
|
:textobj "B" #'evil-textobj-anyblock-inner-block #'evil-textobj-anyblock-a-block
|
|
:textobj "i" #'evil-indent-plus-i-indent #'evil-indent-plus-a-indent
|
|
:textobj "k" #'evil-indent-plus-i-indent-up #'evil-indent-plus-a-indent-up
|
|
:textobj "j" #'evil-indent-plus-i-indent-up-down #'evil-indent-plus-a-indent-up-down
|
|
|
|
(:map evil-window-map ; prefix "C-w"
|
|
;; Navigation
|
|
"C-h" #'evil-window-left
|
|
"C-j" #'evil-window-down
|
|
"C-k" #'evil-window-up
|
|
"C-l" #'evil-window-right
|
|
"C-w" #'other-window
|
|
;; Swapping windows
|
|
"H" #'+evil/window-move-left
|
|
"J" #'+evil/window-move-down
|
|
"K" #'+evil/window-move-up
|
|
"L" #'+evil/window-move-right
|
|
"C-S-w" #'ace-swap-window
|
|
;; Window undo/redo
|
|
"u" #'winner-undo
|
|
"C-u" #'winner-undo
|
|
"C-r" #'winner-redo
|
|
"o" #'doom/window-enlargen
|
|
;; Delete window
|
|
"c" #'+workspace/close-window-or-workspace
|
|
"C-C" #'ace-delete-window))
|
|
|
|
;; evil-commentary
|
|
:n "gc" #'evil-commentary
|
|
|
|
;; evil-exchange
|
|
:n "gx" #'evil-exchange
|
|
|
|
;; evil-matchit
|
|
:nv [tab] #'+evil/matchit-or-toggle-fold
|
|
|
|
;; evil-magit
|
|
(:after evil-magit
|
|
:map (magit-status-mode-map magit-revision-mode-map)
|
|
:n "C-j" nil
|
|
:n "C-k" nil)
|
|
|
|
;; evil-mc
|
|
(:prefix "gz"
|
|
:nv "m" #'evil-mc-make-all-cursors
|
|
:nv "u" #'evil-mc-undo-all-cursors
|
|
:nv "z" #'+evil/mc-make-cursor-here
|
|
:nv "t" #'+evil/mc-toggle-cursors
|
|
:nv "n" #'evil-mc-make-and-goto-next-cursor
|
|
:nv "p" #'evil-mc-make-and-goto-prev-cursor
|
|
:nv "N" #'evil-mc-make-and-goto-last-cursor
|
|
:nv "P" #'evil-mc-make-and-goto-first-cursor
|
|
:nv "d" #'evil-mc-make-and-goto-next-match
|
|
:nv "D" #'evil-mc-make-and-goto-prev-match
|
|
:nv "j" #'evil-mc-make-cursor-move-next-line
|
|
:nv "k" #'evil-mc-make-cursor-move-prev-line)
|
|
(:after evil-mc
|
|
:map evil-mc-key-map
|
|
:nv "C-n" #'evil-mc-make-and-goto-next-cursor
|
|
:nv "C-N" #'evil-mc-make-and-goto-last-cursor
|
|
:nv "C-p" #'evil-mc-make-and-goto-prev-cursor
|
|
:nv "C-P" #'evil-mc-make-and-goto-first-cursor)
|
|
|
|
;; evil-multiedit
|
|
:v "R" #'evil-multiedit-match-all
|
|
:n "M-d" #'evil-multiedit-match-symbol-and-next
|
|
:n "M-D" #'evil-multiedit-match-symbol-and-prev
|
|
:v "M-d" #'evil-multiedit-match-and-next
|
|
:v "M-D" #'evil-multiedit-match-and-prev
|
|
:nv "C-M-d" #'evil-multiedit-restore
|
|
(:after evil-multiedit
|
|
(:map evil-multiedit-state-map
|
|
"M-d" #'evil-multiedit-match-and-next
|
|
"M-D" #'evil-multiedit-match-and-prev
|
|
"RET" #'evil-multiedit-toggle-or-restrict-region)
|
|
(:map (evil-multiedit-state-map evil-multiedit-insert-state-map)
|
|
"C-n" #'evil-multiedit-next
|
|
"C-p" #'evil-multiedit-prev))
|
|
|
|
;; evil-snipe
|
|
(:after evil-snipe
|
|
:map evil-snipe-parent-transient-map
|
|
;; switch to evil-easymotion/avy after a snipe
|
|
"C-;" (λ! (require 'evil-easymotion)
|
|
(call-interactively
|
|
(evilem-create #'evil-snipe-repeat
|
|
:bind ((evil-snipe-scope 'whole-buffer)
|
|
(evil-snipe-enable-highlight)
|
|
(evil-snipe-enable-incremental-highlight))))))
|
|
|
|
;; evil-surround
|
|
:v "S" #'evil-surround-region
|
|
:o "s" #'evil-surround-edit
|
|
:o "S" #'evil-Surround-edit
|
|
|
|
;; expand-region
|
|
:v "v" #'er/expand-region
|
|
:v "V" #'er/contract-region
|
|
|
|
;; flycheck
|
|
:m "]e" #'next-error
|
|
:m "[e" #'previous-error
|
|
(:after flycheck
|
|
:map flycheck-error-list-mode-map
|
|
:n "C-n" #'flycheck-error-list-next-error
|
|
:n "C-p" #'flycheck-error-list-previous-error
|
|
:n "j" #'flycheck-error-list-next-error
|
|
:n "k" #'flycheck-error-list-previous-error
|
|
:n "RET" #'flycheck-error-list-goto-error)
|
|
|
|
;; flyspell
|
|
:m "]S" #'flyspell-correct-word-generic
|
|
:m "[S" #'flyspell-correct-previous-word-generic
|
|
(:after flyspell
|
|
;; Press RET on misspelled words to correct them
|
|
(:map flyspell-mouse-map
|
|
"RET" #'flyspell-correct-word-generic
|
|
"<mouse-1>" #'flyspell-correct-word-generic))
|
|
|
|
;; git-gutter
|
|
:m "]d" #'git-gutter:next-hunk
|
|
:m "[d" #'git-gutter:previous-hunk
|
|
|
|
;; git-timemachine
|
|
(:after git-timemachine
|
|
(:map git-timemachine-mode-map
|
|
:n "C-p" #'git-timemachine-show-previous-revision
|
|
:n "C-n" #'git-timemachine-show-next-revision
|
|
:n "[[" #'git-timemachine-show-previous-revision
|
|
:n "]]" #'git-timemachine-show-next-revision
|
|
:n "q" #'git-timemachine-quit
|
|
:n "gb" #'git-timemachine-blame))
|
|
|
|
;; gist
|
|
(:after gist
|
|
:map gist-list-menu-mode-map
|
|
:n "RET" #'+gist/open-current
|
|
:n "b" #'gist-browse-current-url
|
|
:n "c" #'gist-add-buffer
|
|
:n "d" #'gist-kill-current
|
|
:n "f" #'gist-fork
|
|
:n "q" #'quit-window
|
|
:n "r" #'gist-list-reload
|
|
:n "s" #'gist-star
|
|
:n "S" #'gist-unstar
|
|
:n "y" #'gist-print-current-url)
|
|
|
|
;; helm
|
|
(:after helm
|
|
(:map helm-map
|
|
[left] #'left-char
|
|
[right] #'right-char
|
|
"C-S-n" #'helm-next-source
|
|
"C-S-p" #'helm-previous-source
|
|
"C-j" #'helm-next-line
|
|
"C-k" #'helm-previous-line
|
|
"C-S-j" #'helm-next-source
|
|
"C-S-k" #'helm-previous-source
|
|
"C-f" #'helm-next-page
|
|
"C-S-f" #'helm-previous-page
|
|
"C-u" #'helm-delete-minibuffer-contents
|
|
"C-w" #'backward-kill-word
|
|
"C-r" #'evil-paste-from-register ; Evil registers in helm! Glorious!
|
|
"C-s" #'helm-minibuffer-history
|
|
"C-b" #'backward-word
|
|
;; Swap TAB and C-z
|
|
[tab] #'helm-execute-persistent-action
|
|
"C-z" #'helm-select-action)
|
|
(:after helm-files
|
|
:map (helm-find-files-map helm-read-file-map)
|
|
[M-return] #'helm-ff-run-switch-other-window
|
|
"C-w" #'helm-find-files-up-one-level)
|
|
(:after helm-ag
|
|
:map helm-ag-map
|
|
[backtab] #'helm-ag-edit
|
|
[left] nil
|
|
[right] nil)
|
|
(:after helm-locate
|
|
:map helm-generic-files-map
|
|
[M-return] #'helm-ff-run-switch-other-window)
|
|
(:after helm-buffers
|
|
:map helm-buffer-map
|
|
[M-return] #'helm-buffer-switch-other-window)
|
|
(:after helm-regexp
|
|
:map helm-moccur-map
|
|
[M-return] #'helm-moccur-run-goto-line-ow)
|
|
(:after helm-grep
|
|
:map helm-grep-map
|
|
[M-return] #'helm-grep-run-other-window-action))
|
|
|
|
;; hl-todo
|
|
:m "]t" #'hl-todo-next
|
|
:m "[t" #'hl-todo-previous
|
|
|
|
;; ivy
|
|
(:after ivy
|
|
:map ivy-minibuffer-map
|
|
"C-SPC" #'ivy-call-and-recenter ; preview file
|
|
"C-l" #'ivy-alt-done
|
|
"M-z" #'undo
|
|
"M-v" #'yank
|
|
"C-v" #'yank)
|
|
|
|
;; neotree
|
|
(:after neotree
|
|
:map neotree-mode-map
|
|
:n "g" nil
|
|
:n [tab] #'neotree-quick-look
|
|
:n "RET" #'neotree-enter
|
|
:n [backspace] #'evil-window-prev
|
|
:n "c" #'neotree-create-node
|
|
:n "r" #'neotree-rename-node
|
|
:n "d" #'neotree-delete-node
|
|
:n "j" #'neotree-next-line
|
|
:n "k" #'neotree-previous-line
|
|
:n "n" #'neotree-next-line
|
|
:n "p" #'neotree-previous-line
|
|
:n "h" #'+neotree/collapse-or-up
|
|
:n "l" #'+neotree/expand-or-open
|
|
:n "J" #'neotree-select-next-sibling-node
|
|
:n "K" #'neotree-select-previous-sibling-node
|
|
:n "H" #'neotree-select-up-node
|
|
:n "L" #'neotree-select-down-node
|
|
:n "G" #'evil-goto-line
|
|
:n "gg" #'evil-goto-first-line
|
|
:n "v" #'neotree-enter-vertical-split
|
|
:n "s" #'neotree-enter-horizontal-split
|
|
:n "q" #'neotree-hide
|
|
:n "R" #'neotree-refresh)
|
|
|
|
;; realgud
|
|
(:after realgud
|
|
:map realgud:shortkey-mode-map
|
|
:n "j" #'evil-next-line
|
|
:n "k" #'evil-previous-line
|
|
:n "h" #'evil-backward-char
|
|
:n "l" #'evil-forward-char
|
|
:m "n" #'realgud:cmd-next
|
|
:m "b" #'realgud:cmd-break
|
|
:m "B" #'realgud:cmd-clear
|
|
:n "c" #'realgud:cmd-continue)
|
|
|
|
;; rotate-text
|
|
:n "!" #'rotate-text
|
|
|
|
;; swiper
|
|
(:after swiper
|
|
(:map swiper-map
|
|
[backtab] #'+ivy/wgrep-occur))
|
|
|
|
;; yasnippet
|
|
(:after yasnippet
|
|
(:map yas-keymap
|
|
"C-e" #'+snippets/goto-end-of-field
|
|
"C-a" #'+snippets/goto-start-of-field
|
|
"<M-right>" #'+snippets/goto-end-of-field
|
|
"<M-left>" #'+snippets/goto-start-of-field
|
|
"<M-backspace>" #'+snippets/delete-to-start-of-field
|
|
[backspace] #'+snippets/delete-backward-char
|
|
[delete] #'+snippets/delete-forward-char-or-field)
|
|
(:map yas-minor-mode-map
|
|
:ig [tab] yas-maybe-expand
|
|
:v [tab] #'yas-insert-snippet))
|
|
|
|
|
|
;; --- Major mode bindings --------------------------
|
|
(:after markdown-mode
|
|
(:map markdown-mode-map
|
|
;; fix conflicts with private bindings
|
|
"<backspace>" nil
|
|
"<M-left>" nil
|
|
"<M-right>" nil))
|
|
|
|
|
|
;; --- Built-in plugins -----------------------------
|
|
(:when (featurep! :completion company)
|
|
(:after comint
|
|
;; TAB auto-completion in term buffers
|
|
:map comint-mode-map [tab] #'company-complete))
|
|
|
|
(:map* (help-mode-map helpful-mode-map)
|
|
:n "o" #'ace-link-help
|
|
:n "q" #'quit-window
|
|
:n "Q" #'ivy-resume
|
|
:n "]l" #'forward-button
|
|
:n "[l" #'backward-button)
|
|
|
|
(:after vc-annotate
|
|
:map vc-annotate-mode-map
|
|
[remap quit-window] #'kill-this-buffer))
|
|
|
|
|
|
;; <leader>
|
|
;;
|
|
|
|
(map! :leader
|
|
:desc "Ex command" :nv ";" #'evil-ex
|
|
:desc "M-x" :nv ":" #'execute-extended-command
|
|
:desc "Pop up scratch buffer" :nv "x" #'doom/open-scratch-buffer
|
|
:desc "Org Capture" :nv "X" #'org-capture
|
|
|
|
;; Most commonly used
|
|
:desc "Find file in project" :n "SPC" #'projectile-find-file
|
|
:desc "Browse files" :n "." #'find-file
|
|
:desc "Toggle last popup" :n "~" #'+popup/toggle
|
|
(:when (featurep! :completion ivy)
|
|
:desc "Resume last search" :n "'" #'ivy-resume)
|
|
(:when (featurep! :completion helm)
|
|
:desc "Resume last search" :n "'" #'helm-resume)
|
|
:desc "Blink cursor line" :n "DEL" #'+nav-flash/blink-cursor
|
|
:desc "Jump to bookmark" :n "RET" #'bookmark-jump
|
|
|
|
(:when (featurep! :feature workspaces)
|
|
:desc "Switch workspace buffer" :n "," #'persp-switch-to-buffer
|
|
:desc "Switch buffer" :n "<" #'switch-to-buffer)
|
|
(:unless (featurep! :feature workspaces)
|
|
:desc "Switch buffer" :n "," #'switch-to-buffer)
|
|
|
|
;; C-u is used by evil
|
|
:desc "Universal argument" :n "u" #'universal-argument
|
|
:desc "window" :n "w" evil-window-map
|
|
|
|
(:desc "previous..." :prefix "["
|
|
:desc "Text size" :nv "[" #'text-scale-decrease
|
|
:desc "Buffer" :nv "b" #'previous-buffer
|
|
:desc "Diff Hunk" :nv "d" #'git-gutter:previous-hunk
|
|
:desc "Todo" :nv "t" #'hl-todo-previous
|
|
:desc "Error" :nv "e" #'previous-error
|
|
:desc "Workspace" :nv "w" #'+workspace/switch-left
|
|
:desc "Smart jump" :nv "h" #'smart-backward
|
|
:desc "Spelling error" :nv "s" #'evil-prev-flyspell-error
|
|
:desc "Spelling correction" :n "S" #'flyspell-correct-previous-word-generic)
|
|
|
|
(:desc "next..." :prefix "]"
|
|
:desc "Text size" :nv "]" #'text-scale-increase
|
|
:desc "Buffer" :nv "b" #'next-buffer
|
|
:desc "Diff Hunk" :nv "d" #'git-gutter:next-hunk
|
|
:desc "Todo" :nv "t" #'hl-todo-next
|
|
:desc "Error" :nv "e" #'next-error
|
|
:desc "Workspace" :nv "w" #'+workspace/switch-right
|
|
:desc "Spelling error" :nv "s" #'evil-next-flyspell-error
|
|
:desc "Spelling correction" :n "S" #'flyspell-correct-word-generic)
|
|
|
|
(:desc "search" :prefix "/"
|
|
(:when (featurep! :completion ivy)
|
|
:desc "Buffer" :nv "b" #'swiper
|
|
:desc "Project" :nv "p" #'+ivy/project-search
|
|
:desc "Directory" :nv "d" #'+ivy/project-search-from-cwd)
|
|
(:when (featurep! :completion helm)
|
|
:desc "Buffer" :nv "b" #'swiper-helm
|
|
:desc "Project" :nv "p" #'+helm/project-search
|
|
:desc "Directory" :nv "d" #'+helm/project-search-from-cwd)
|
|
:desc "Symbols" :nv "i" #'imenu
|
|
:desc "Symbols across buffers" :nv "I" #'imenu-anywhere
|
|
:desc "Online providers" :nv "o" #'+lookup/online-select)
|
|
|
|
(:desc "workspace" :prefix [tab]
|
|
:desc "Display tab bar" :n [tab] #'+workspace/display
|
|
:desc "New workspace" :n "n" #'+workspace/new
|
|
:desc "Load workspace from file" :n "l" #'+workspace/load
|
|
:desc "Load a past session" :n "L" #'+workspace/load-session
|
|
:desc "Save workspace to file" :n "s" #'+workspace/save
|
|
:desc "Autosave current session" :n "S" #'+workspace/save-session
|
|
:desc "Switch workspace" :n "." #'+workspace/switch-to
|
|
:desc "Kill all buffers" :n "x" #'doom/kill-all-buffers
|
|
:desc "Delete session" :n "X" #'+workspace/kill-session
|
|
:desc "Delete this workspace" :n "d" #'+workspace/delete
|
|
:desc "Rename workspace" :n "r" #'+workspace/rename
|
|
:desc "Restore last session" :n "R" #'+workspace/load-last-session
|
|
:desc "Next workspace" :n "]" #'+workspace/switch-right
|
|
:desc "Previous workspace" :n "[" #'+workspace/switch-left
|
|
:desc "Switch to 1st workspace" :n "1" (λ! (+workspace/switch-to 0))
|
|
:desc "Switch to 2nd workspace" :n "2" (λ! (+workspace/switch-to 1))
|
|
:desc "Switch to 3rd workspace" :n "3" (λ! (+workspace/switch-to 2))
|
|
:desc "Switch to 4th workspace" :n "4" (λ! (+workspace/switch-to 3))
|
|
:desc "Switch to 5th workspace" :n "5" (λ! (+workspace/switch-to 4))
|
|
:desc "Switch to 6th workspace" :n "6" (λ! (+workspace/switch-to 5))
|
|
:desc "Switch to 7th workspace" :n "7" (λ! (+workspace/switch-to 6))
|
|
:desc "Switch to 8th workspace" :n "8" (λ! (+workspace/switch-to 7))
|
|
:desc "Switch to 9th workspace" :n "9" (λ! (+workspace/switch-to 8))
|
|
:desc "Switch to last workspace" :n "0" #'+workspace/switch-to-last)
|
|
|
|
(:desc "buffer" :prefix "b"
|
|
:desc "New empty buffer" :n "n" #'evil-buffer-new
|
|
(:when (featurep! :feature workspaces)
|
|
:desc "Switch workspace buffer" :n "b" #'persp-switch-to-buffer
|
|
:desc "Switch buffer" :n "B" #'switch-to-buffer)
|
|
(:unless (featurep! :feature workspaces)
|
|
:desc "Switch buffer" :n "b" #'switch-to-buffer)
|
|
:desc "Kill buffer" :n "k" #'kill-this-buffer
|
|
:desc "Kill other buffers" :n "o" #'doom/kill-other-buffers
|
|
:desc "Save buffer" :n "s" #'save-buffer
|
|
:desc "Pop scratch buffer" :n "x" #'doom/open-scratch-buffer
|
|
:desc "Bury buffer" :n "z" #'bury-buffer
|
|
:desc "Next buffer" :n "]" #'next-buffer
|
|
:desc "Previous buffer" :n "[" #'previous-buffer
|
|
:desc "Sudo edit this file" :n "S" #'doom/sudo-this-file)
|
|
|
|
(:desc "code" :prefix "c"
|
|
:desc "List errors" :n "x" #'flycheck-list-errors
|
|
:desc "Evaluate buffer/region" :n "e" #'+eval/buffer
|
|
:v "e" #'+eval/region
|
|
:desc "Evaluate & replace region" :nv "E" #'+eval:replace-region
|
|
:desc "Format buffer/region" :n "f" #'+format/buffer
|
|
:v "f" #'+format/region
|
|
:desc "Build tasks" :nv "b" #'+eval/build
|
|
:desc "Jump to definition" :n "d" #'+lookup/definition
|
|
:desc "Jump to references" :n "D" #'+lookup/references
|
|
:desc "Open REPL" :n "r" #'+eval/open-repl
|
|
:v "r" #'+eval:repl)
|
|
|
|
(:desc "file" :prefix "f"
|
|
:desc "Find file" :n "." #'find-file
|
|
:desc "Sudo find file" :n ">" #'doom/sudo-find-file
|
|
:desc "Find file in project" :n "/" #'projectile-find-file
|
|
:desc "Find file from here" :n "?" #'counsel-file-jump
|
|
:desc "Find other file" :n "a" #'projectile-find-other-file
|
|
:desc "Open project editorconfig" :n "c" #'editorconfig-find-current-editorconfig
|
|
:desc "Find directory" :n "d" #'dired
|
|
:desc "Find file in emacs.d" :n "e" #'+default/find-in-emacsd
|
|
:desc "Browse emacs.d" :n "E" #'+default/browse-emacsd
|
|
:desc "Recent files" :n "r" #'recentf-open-files
|
|
:desc "Recent project files" :n "R" #'projectile-recentf
|
|
:desc "Yank filename" :n "y" #'+default/yank-buffer-filename
|
|
:desc "Find file in private config" :n "p" #'+default/find-in-config
|
|
:desc "Browse private config" :n "P" #'+default/browse-config
|
|
:desc "Delete this file" :n "X" #'doom/delete-this-file)
|
|
|
|
(:desc "git" :prefix "g"
|
|
:desc "Magit blame" :n "b" #'magit-blame
|
|
:desc "Magit commit" :n "c" #'magit-commit
|
|
:desc "Magit clone" :n "C" #'+magit/clone
|
|
:desc "Magit dispatch" :n "d" #'magit-dispatch-popup
|
|
:desc "Magit find-file" :n "f" #'magit-find-file
|
|
:desc "Magit status" :n "g" #'magit-status
|
|
:desc "Magit file delete" :n "x" #'magit-file-delete
|
|
:desc "List gists" :n "G" #'+gist:list
|
|
:desc "Initialize repo" :n "i" #'magit-init
|
|
:desc "Browse issues tracker" :n "I" #'+vc/git-browse-issues
|
|
:desc "Magit buffer log" :n "l" #'magit-log-buffer-file
|
|
:desc "List repositories" :n "L" #'magit-list-repositories
|
|
:desc "Browse remote" :n "o" #'+vc/git-browse
|
|
:desc "Magit push popup" :n "p" #'magit-push-popup
|
|
:desc "Magit pull popup" :n "P" #'magit-pull-popup
|
|
:desc "Git revert hunk" :n "r" #'git-gutter:revert-hunk
|
|
:desc "Git revert file" :n "R" #'vc-revert
|
|
:desc "Git stage hunk" :n "s" #'git-gutter:stage-hunk
|
|
:desc "Git stage file" :n "S" #'magit-stage-file
|
|
:desc "Git time machine" :n "t" #'git-timemachine-toggle
|
|
:desc "Git unstage file" :n "U" #'magit-unstage-file
|
|
:desc "Next hunk" :nv "]" #'git-gutter:next-hunk
|
|
:desc "Previous hunk" :nv "[" #'git-gutter:previous-hunk)
|
|
|
|
(:desc "help" :prefix "h"
|
|
:n "h" help-map
|
|
:desc "Apropos" :n "a" #'apropos
|
|
:desc "Open Bug Report" :n "b" #'doom/open-bug-report
|
|
:desc "Describe char" :n "c" #'describe-char
|
|
:desc "Describe DOOM module" :n "d" #'doom/describe-module
|
|
:desc "Open Doom manual" :n "D" #'doom/open-manual
|
|
:desc "Open vanilla sandbox" :n "E" #'doom/open-vanilla-sandbox
|
|
:desc "Describe function" :n "f" #'describe-function
|
|
:desc "Describe face" :n "F" #'describe-face
|
|
:desc "Info" :n "i" #'info-lookup-symbol
|
|
:desc "Describe key" :n "k" #'describe-key
|
|
:desc "Find documentation" :n "K" #'+lookup/documentation
|
|
:desc "Find library" :n "l" #'find-library
|
|
:desc "Command log" :n "L" #'clm/toggle-command-log-buffer
|
|
:desc "View *Messages*" :n "m" #'view-echo-area-messages
|
|
:desc "Describe mode" :n "M" #'describe-mode
|
|
:desc "Toggle profiler" :n "p" #'doom/toggle-profiler
|
|
:desc "Reload theme" :n "r" #'doom/reload-theme
|
|
:desc "Reload private config" :n "R" #'doom/reload
|
|
:desc "Describe DOOM setting" :n "s" #'doom/describe-setters
|
|
:desc "Describe variable" :n "v" #'describe-variable
|
|
:desc "Print Doom version" :n "V" #'doom/version
|
|
:desc "Man pages" :n "w" #'+default/man-or-woman
|
|
:desc "Describe at point" :n "." #'helpful-at-point
|
|
:desc "What face" :n "'" #'doom/what-face
|
|
:desc "What minor modes" :n ";" #'doom/describe-active-minor-mode)
|
|
|
|
(:desc "insert" :prefix "i"
|
|
(:when (featurep! :completion helm)
|
|
:desc "From kill-ring" :nv "y" #'helm-show-kill-ring)
|
|
(:when (featurep! :completion ivy)
|
|
:desc "From kill-ring" :nv "y" #'counsel-yank-pop
|
|
:desc "From evil registers" :nv "r" #'counsel-evil-registers)
|
|
:desc "From snippet" :nv "s" #'yas-insert-snippet)
|
|
|
|
(:desc "notes" :prefix "n"
|
|
(:when (featurep! :ui deft)
|
|
:desc "Deft" :n "d" #'deft)
|
|
:desc "Find file in notes" :n "n" #'+default/find-in-notes
|
|
:desc "Browse notes" :n "N" #'+default/browse-notes
|
|
:desc "Org capture" :n "x" #'org-capture)
|
|
|
|
(:desc "open" :prefix "o"
|
|
:desc "Org agenda" :n "a" #'org-agenda
|
|
:desc "Default browser" :n "b" #'browse-url-of-file
|
|
:desc "Debugger" :n "d" #'+debug/open
|
|
:desc "REPL" :n "r" #'+eval/open-repl
|
|
:v "r" #'+eval:repl
|
|
:desc "Dired" :n "-" #'dired-jump
|
|
(:when (featurep! :ui neotree)
|
|
:desc "Project sidebar" :n "p" #'+neotree/open
|
|
:desc "Find file in project sidebar" :n "P" #'+neotree/find-this-file)
|
|
(:when (featurep! :ui treemacs)
|
|
:desc "Project sidebar" :n "p" #'+treemacs/toggle
|
|
:desc "Find file in project sidebar" :n "P" #'+treemacs/find-file)
|
|
:desc "Imenu sidebar" :nv "i" #'imenu-list-smart-toggle
|
|
:desc "Terminal" :n "t" #'+term/open
|
|
:desc "Terminal in popup" :n "T" #'+term/open-popup-in-project
|
|
:desc "Eshell" :n "e" #'+eshell/open
|
|
:desc "Eshell in popup" :n "E" #'+eshell/open-popup
|
|
|
|
(:when (featurep! :collab floobits)
|
|
:desc "floobits" :prefix "f"
|
|
:n "c" #'floobits-clear-highlights
|
|
:n "f" #'floobits-follow-user
|
|
:n "j" #'floobits-join-workspace
|
|
:n "l" #'floobits-leave-workspace
|
|
:n "R" #'floobits-share-dir-private
|
|
:n "s" #'floobits-summon
|
|
:n "t" #'floobits-follow-mode-toggle
|
|
:n "U" #'floobits-share-dir-public)
|
|
|
|
(:when (featurep! :tools macos)
|
|
:desc "Reveal in Finder" :n "o" #'+macos/reveal-in-finder
|
|
:desc "Reveal project in Finder" :n "O" #'+macos/reveal-project-in-finder
|
|
:desc "Send to Transmit" :n "u" #'+macos/send-to-transmit
|
|
:desc "Send project to Transmit" :n "U" #'+macos/send-project-to-transmit
|
|
:desc "Send to Launchbar" :n "l" #'+macos/send-to-launchbar
|
|
:desc "Send project to Launchbar" :n "L" #'+macos/send-project-to-launchbar)
|
|
|
|
(:when (featurep! :tools docker)
|
|
:desc "Docker" :n "D" #'docker))
|
|
|
|
(:desc "project" :prefix "p"
|
|
:desc "Browse project" :n "." #'+default/browse-project
|
|
:desc "Find file in project" :n "/" #'projectile-find-file
|
|
:desc "Run cmd in project root" :nv "!" #'projectile-run-shell-command-in-root
|
|
:desc "Compile project" :n "c" #'projectile-compile-project
|
|
:desc "Find other file" :n "o" #'projectile-find-other-file
|
|
:desc "Switch project" :n "p" #'projectile-switch-project
|
|
:desc "Recent project files" :n "r" #'projectile-recentf
|
|
:desc "List project tasks" :n "t" #'+ivy/tasks
|
|
:desc "Invalidate cache" :n "x" #'projectile-invalidate-cache)
|
|
|
|
(:desc "quit" :prefix "q"
|
|
:desc "Quit Emacs" :n "q" #'evil-quit-all
|
|
:desc "Save and quit" :n "Q" #'evil-save-and-quit
|
|
:desc "Quit (forget session)" :n "X" #'+workspace/kill-session-and-quit
|
|
:desc "Restart & restore Doom" :n "r" #'+workspace/restart-emacs-then-restore
|
|
:desc "Restart Doom" :n "R" #'restart-emacs)
|
|
|
|
(:when (featurep! :tools upload)
|
|
(:desc "remote" :prefix "r"
|
|
:desc "Upload local" :n "u" #'ssh-deploy-upload-handler
|
|
:desc "Upload local (force)" :n "U" #'ssh-deploy-upload-handler-forced
|
|
:desc "Download remote" :n "d" #'ssh-deploy-download-handler
|
|
:desc "Diff local & remote" :n "D" #'ssh-deploy-diff-handler
|
|
:desc "Browse remote files" :n "." #'ssh-deploy-browse-remote-handler
|
|
:desc "Detect remote changes" :n ">" #'ssh-deploy-remote-changes-handler))
|
|
|
|
(:when (featurep! :feature snippets)
|
|
(:desc "snippets" :prefix "s"
|
|
:desc "New snippet" :n "n" #'yas-new-snippet
|
|
:desc "Insert snippet" :nv "i" #'yas-insert-snippet
|
|
:desc "Find snippet" :n "s" #'+default/find-in-snippets
|
|
:desc "Find snippet for mode" :n "S" #'+default/browse-snippets
|
|
:desc "Find global snippet" :n "/" #'yas-visit-snippet-file
|
|
:desc "Reload snippets" :n "r" #'yas-reload-all))
|
|
|
|
(:desc "toggle" :prefix "t"
|
|
:desc "Flyspell" :n "s" #'flyspell-mode
|
|
:desc "Flycheck" :n "f" #'flycheck-mode
|
|
:desc "Line numbers" :n "l" #'doom/toggle-line-numbers
|
|
:desc "Frame fullscreen" :n "F" #'toggle-frame-fullscreen
|
|
:desc "Indent guides" :n "i" #'highlight-indentation-mode
|
|
:desc "Indent guides (column)" :n "I" #'highlight-indentation-current-column-mode
|
|
:desc "Impatient mode" :n "h" #'+impatient-mode/toggle
|
|
:desc "Big mode" :n "b" #'doom-big-font-mode
|
|
:desc "Evil goggles" :n "g" #'evil-goggles-mode
|
|
:desc "org-tree-slide mode" :n "p" #'+org-present/start))
|
|
|
|
|
|
;;
|
|
;; Keybinding fixes
|
|
|
|
;; This section is dedicated to "fixing" certain keys so that they behave
|
|
;; sensibly (and consistently with similar contexts).
|
|
|
|
;; Make SPC u SPC u possible (#747)
|
|
(define-key universal-argument-map
|
|
(kbd (concat doom-leader-key " u")) #'universal-argument-more)
|
|
|
|
;; Fix MacOS shift+tab
|
|
(when IS-MAC
|
|
(define-key input-decode-map [S-iso-lefttab] [backtab]))
|
|
|
|
(defun +default|setup-input-decode-map ()
|
|
(define-key input-decode-map (kbd "TAB") [tab]))
|
|
(add-hook 'tty-setup-hook #'+default|setup-input-decode-map)
|
|
|
|
(after! tabulated-list
|
|
(define-key tabulated-list-mode-map "q" #'quit-window))
|
|
|
|
(when (featurep! :feature evil +everywhere)
|
|
(evil-define-key* 'insert 'global
|
|
;; I want C-a and C-e to be a little smarter. C-a will jump to indentation.
|
|
;; Pressing it again will send you to the true bol. Same goes for C-e,
|
|
;; except it will ignore comments and trailing whitespace before jumping to
|
|
;; eol.
|
|
"\C-a" #'doom/backward-to-bol-or-indent
|
|
"\C-e" #'doom/forward-to-last-non-comment-or-eol
|
|
"\C-u" #'doom/backward-kill-to-bol-and-indent
|
|
;; textmate-esque newline insertion
|
|
[M-return] #'evil-open-below
|
|
[S-M-return] #'evil-open-above
|
|
;; Emacsien motions for insert mode
|
|
"\C-b" #'backward-word
|
|
"\C-f" #'forward-word
|
|
;; textmate-esque deletion
|
|
[M-backspace] #'doom/backward-kill-to-bol-and-indent)
|
|
|
|
(define-key! evil-ex-completion-map
|
|
"\C-s" (if (featurep! :completion ivy)
|
|
#'counsel-minibuffer-history
|
|
#'helm-minibuffer-history)
|
|
"\C-a" #'move-beginning-of-line
|
|
"\C-b" #'backward-word
|
|
"\C-f" #'forward-word)
|
|
|
|
(after! view
|
|
(define-key view-mode-map [escape] #'View-quit-all)))
|
|
|
|
;; Restore common editing keys (and ESC) in minibuffer
|
|
(defun +default|fix-minibuffer-in-map (map)
|
|
(define-key! map
|
|
"\C-s" (if (featurep! :completion ivy)
|
|
#'counsel-minibuffer-history
|
|
#'helm-minibuffer-history)
|
|
"\C-a" #'move-beginning-of-line
|
|
"\C-w" #'backward-kill-word
|
|
"\C-u" #'backward-kill-sentence
|
|
"\C-b" #'backward-word
|
|
"\C-f" #'forward-word
|
|
"\C-z" (λ! (ignore-errors (call-interactively #'undo))))
|
|
(when (featurep! :feature evil +everywhere)
|
|
(define-key! map
|
|
[escape] #'abort-recursive-edit
|
|
"\C-r" #'evil-paste-from-register
|
|
"\C-j" #'next-line
|
|
"\C-k" #'previous-line
|
|
(kbd "C-S-j") #'scroll-up-command
|
|
(kbd "C-S-k") #'scroll-down-command)))
|
|
|
|
(mapc #'+default|fix-minibuffer-in-map
|
|
(list minibuffer-local-map
|
|
minibuffer-local-ns-map
|
|
minibuffer-local-completion-map
|
|
minibuffer-local-must-match-map
|
|
minibuffer-local-isearch-map
|
|
read-expression-map))
|
|
|
|
(after! ivy (+default|fix-minibuffer-in-map ivy-minibuffer-map))
|
|
|
|
(after! man
|
|
(evil-define-key* 'normal Man-mode-map "q" #'kill-this-buffer))
|
|
|
|
|
|
;; Evil-collection fixes
|
|
(setq evil-collection-key-blacklist
|
|
(list "C-j" "C-k" "gd" "gf" "K" "[" "]" "gz"
|
|
doom-leader-key doom-localleader-key))
|