Flatten :bind lists
This commit is contained in:
		
							parent
							
								
									dfa43090b0
								
							
						
					
					
						commit
						9869e2ee27
					
				
							
								
								
									
										52
									
								
								init.el
									
									
									
									
									
								
							
							
						
						
									
										52
									
								
								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)
 | 
			
		||||
   ("<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
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user