expand-region, lispy, remind-bindings; avy-goto-line
This commit is contained in:
parent
4c582ba398
commit
48a2ef5b47
22
init.el
22
init.el
@ -113,6 +113,9 @@
|
|||||||
|
|
||||||
(global-set-key (kbd "C-c h b") 'describe-personal-keybindings)
|
(global-set-key (kbd "C-c h b") 'describe-personal-keybindings)
|
||||||
|
|
||||||
|
(use-package remind-bindings
|
||||||
|
:bind ("H-?" . remind-bindings-togglebuffer))
|
||||||
|
|
||||||
|
|
||||||
;;; ### More efficient buffer/file selection ###
|
;;; ### More efficient buffer/file selection ###
|
||||||
|
|
||||||
@ -134,6 +137,7 @@
|
|||||||
(swiper-all . ivy--regex-plus)
|
(swiper-all . ivy--regex-plus)
|
||||||
(t . ivy--regex-fuzzy)))
|
(t . ivy--regex-fuzzy)))
|
||||||
:config
|
:config
|
||||||
|
(add-to-list 'ivy-ignore-buffers "\\`\\*remind-bindings\\*")
|
||||||
(ivy-mode 1)
|
(ivy-mode 1)
|
||||||
(counsel-mode 1)
|
(counsel-mode 1)
|
||||||
:bind
|
:bind
|
||||||
@ -216,7 +220,8 @@
|
|||||||
|
|
||||||
(use-package avy
|
(use-package avy
|
||||||
:bind
|
:bind
|
||||||
("H-." . avy-goto-char-timer))
|
(("H-." . avy-goto-char-timer)
|
||||||
|
("H-," . avy-goto-line)))
|
||||||
|
|
||||||
;;; Bind key `o` to selection of a link in help or info buffers by a
|
;;; Bind key `o` to selection of a link in help or info buffers by a
|
||||||
;;; single or two letters.
|
;;; single or two letters.
|
||||||
@ -258,6 +263,13 @@
|
|||||||
:hook (prog-mode . ws-butler-mode))
|
:hook (prog-mode . ws-butler-mode))
|
||||||
|
|
||||||
|
|
||||||
|
;;; Expand region
|
||||||
|
|
||||||
|
(use-package expand-region
|
||||||
|
:bind ("H-e" . er/expand-region)
|
||||||
|
:ensure t)
|
||||||
|
|
||||||
|
|
||||||
;;; ### Spell checking ###
|
;;; ### Spell checking ###
|
||||||
|
|
||||||
(setq ispell-dictionary "american")
|
(setq ispell-dictionary "american")
|
||||||
@ -496,15 +508,15 @@ of the key binding used to execute this command."
|
|||||||
(if (file-accessible-directory-p path)
|
(if (file-accessible-directory-p path)
|
||||||
(setq common-lisp-hyperspec-root (concat "file://" path))))
|
(setq common-lisp-hyperspec-root (concat "file://" path))))
|
||||||
|
|
||||||
(use-package paredit
|
(use-package lispy
|
||||||
:hook (eval-expression-minibuffer-setup . paredit-mode))
|
:hook (eval-expression-minibuffer-setup . lispy-mode))
|
||||||
|
|
||||||
(use-package paren-face
|
(use-package paren-face
|
||||||
:defer)
|
:defer)
|
||||||
|
|
||||||
(defun my-emacs-lisp-mode-hook-fn ()
|
(defun my-emacs-lisp-mode-hook-fn ()
|
||||||
(set (make-local-variable 'lisp-indent-function) #'lisp-indent-function)
|
(set (make-local-variable 'lisp-indent-function) #'lisp-indent-function)
|
||||||
(paredit-mode 1)
|
(lispy-mode 1)
|
||||||
(local-set-key (kbd "C-c S") (global-key-binding (kbd "M-s")))
|
(local-set-key (kbd "C-c S") (global-key-binding (kbd "M-s")))
|
||||||
(local-set-key (kbd "C-c C-z")
|
(local-set-key (kbd "C-c C-z")
|
||||||
(lambda () (interactive) (switch-to-buffer "*scratch*")))
|
(lambda () (interactive) (switch-to-buffer "*scratch*")))
|
||||||
@ -523,7 +535,7 @@ of the key binding used to execute this command."
|
|||||||
(defun my-lisp-mode-hook-fn ()
|
(defun my-lisp-mode-hook-fn ()
|
||||||
(set (make-local-variable 'lisp-indent-function)
|
(set (make-local-variable 'lisp-indent-function)
|
||||||
#'common-lisp-indent-function)
|
#'common-lisp-indent-function)
|
||||||
(paredit-mode 1)
|
(lispy-mode 1)
|
||||||
(local-set-key (kbd "C-c S") (global-key-binding (kbd "M-s")))
|
(local-set-key (kbd "C-c S") (global-key-binding (kbd "M-s")))
|
||||||
(show-paren-mode 1)
|
(show-paren-mode 1)
|
||||||
(paren-face-mode)
|
(paren-face-mode)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user