1

Flatten :bind lists

This commit is contained in:
Jessie Hildebrandt 2023-01-26 05:46:56 -05:00
parent dfa43090b0
commit 9869e2ee27

52
init.el
View File

@ -819,9 +819,9 @@ DOCSTRING is an optional form that is discarded upon expansion."
:config
(global-anzu-mode)
:bind
(("M-s r ." . anzu-query-replace-at-cursor)
("<remap> <query-replace>" . anzu-query-replace)
("<remap> <query-replace-regexp>" . anzu-query-replace-regexp)))
("M-s r ." . anzu-query-replace-at-cursor)
("<remap> <query-replace>" . anzu-query-replace)
("<remap> <query-replace-regexp>" . anzu-query-replace-regexp))
;; ---------------------------------- ;;
;; bufler
@ -882,7 +882,7 @@ DOCSTRING is an optional form that is discarded upon expansion."
(auto-directory)
(auto-mode)))
:bind
(("C-x C-b" . bufler-list)))
("C-x C-b" . bufler-list))
;; ---------------------------------- ;;
;; cider
@ -904,15 +904,15 @@ DOCSTRING is an optional form that is discarded upon expansion."
(eval-after-load 'esh-mode (lambda ()
(bind-key "C-r" #'consult-history 'eshell-mode-map)))
:bind
(("M-s l" . consult-line)
("M-s L" . consult-line-multi)
("C-S-s" . consult-line-multi)
("C-x M-b" . consult-buffer-other-window)
("<remap> <goto-line>" . consult-goto-line)
("<remap> <isearch-forward>" . consult-line)
("<remap> <switch-to-buffer>" . consult-buffer)
("<remap> <yank-pop>" . consult-yank-from-kill-ring)
("<remap> <project-find-regexp>" . consult-ripgrep)))
("M-s l" . consult-line)
("M-s L" . consult-line-multi)
("C-S-s" . consult-line-multi)
("C-x M-b" . consult-buffer-other-window)
("<remap> <goto-line>" . consult-goto-line)
("<remap> <isearch-forward>" . consult-line)
("<remap> <switch-to-buffer>" . consult-buffer)
("<remap> <yank-pop>" . consult-yank-from-kill-ring)
("<remap> <project-find-regexp>" . consult-ripgrep))
;; ---------------------------------- ;;
;; corfu
@ -1209,10 +1209,10 @@ DOCSTRING is an optional form that is discarded upon expansion."
(external-package multiple-cursors
"Provides the ability to summon additional cursors."
:bind
(("C->" . mc/mark-next-like-this)
("C-<" . mc/mark-previous-like-this)
("C-c C->" . mc/mark-all-like-this)
("C-c C-<" . mc/mark-all-like-this)))
("C->" . mc/mark-next-like-this)
("C-<" . mc/mark-previous-like-this)
("C-c C->" . mc/mark-all-like-this)
("C-c C-<" . mc/mark-all-like-this))
;; ---------------------------------- ;;
;; neotree
@ -1229,11 +1229,11 @@ DOCSTRING is an optional form that is discarded upon expansion."
(neo-confirm-create-file #'off-p "Skip confirmation when creating a new file from neotree")
(neo-confirm-create-directory #'off-p "Skip confirmation when creating a new directory from neotree")
:bind
(("C-c t" . neotree)
(:map neotree-mode-map
("C-c w" . (lambda () (interactive) nil))
("C-c q" . (lambda () (interactive) nil))
("C-c n" . (lambda () (interactive) nil)))))
("C-c t" . neotree)
(:map neotree-mode-map
("C-c w" . (lambda () (interactive) nil))
("C-c q" . (lambda () (interactive) nil))
("C-c n" . (lambda () (interactive) nil))))
;; ---------------------------------- ;;
;; package-lint
@ -1402,10 +1402,10 @@ DOCSTRING is an optional form that is discarded upon expansion."
(writeroom-global-effects nil "Disable all frame-wide writeroom effects.")
(writeroom-fringes-outside-margins nil "Keep the fringes close to the text.")
:bind
(("C-c c" . writeroom-mode)
(:map writeroom-mode-map
("C-<next>" . writeroom-decrease-width)
("C-<prior>" . writeroom-increase-width))))
("C-c c" . writeroom-mode)
(:map writeroom-mode-map
("C-<next>" . writeroom-decrease-width)
("C-<prior>" . writeroom-increase-width)))
;; ---------------------------------- ;;
;; yansippet