From 9869e2ee27b3d638c01260bb31b45fbea2533389 Mon Sep 17 00:00:00 2001 From: Jessie Hildebrandt Date: Thu, 26 Jan 2023 05:46:56 -0500 Subject: [PATCH] Flatten :bind lists --- init.el | 52 ++++++++++++++++++++++++++-------------------------- 1 file changed, 26 insertions(+), 26 deletions(-) diff --git a/init.el b/init.el index cf64026..56490ac 100644 --- a/init.el +++ b/init.el @@ -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) - (" " . anzu-query-replace) - (" " . anzu-query-replace-regexp))) + ("M-s r ." . anzu-query-replace-at-cursor) + (" " . anzu-query-replace) + (" " . 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) - (" " . consult-goto-line) - (" " . consult-line) - (" " . consult-buffer) - (" " . consult-yank-from-kill-ring) - (" " . 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) + (" " . consult-goto-line) + (" " . consult-line) + (" " . consult-buffer) + (" " . consult-yank-from-kill-ring) + (" " . 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-" . writeroom-decrease-width) - ("C-" . writeroom-increase-width)))) + ("C-c c" . writeroom-mode) + (:map writeroom-mode-map + ("C-" . writeroom-decrease-width) + ("C-" . writeroom-increase-width))) ;; ---------------------------------- ;; ;; yansippet