diff --git a/init.el b/init.el
index 8e30296..bb16383 100644
--- a/init.el
+++ b/init.el
@@ -281,11 +281,11 @@ Interactively, force the recompile if called with a prefix."
   :after evil
   :config
   (evil-define-key 'operator evil-surround-mode-map
-                    "z" #'evil-surround-edit
-                    "Z" #'evil-Surround-edit)
+    "z" #'evil-surround-edit
+    "Z" #'evil-Surround-edit)
   (evil-define-key 'visual evil-surround-mode-map
-                    "gz" #'evil-surround-region
-                    "gZ" #'evil-Surround-region)
+    "gz" #'evil-surround-region
+    "gZ" #'evil-Surround-region)
   (global-evil-surround-mode 1))
 (use-package evil-terminal-cursor-changer
   :after evil
@@ -299,13 +299,19 @@ Interactively, force the recompile if called with a prefix."
          ("C-c C-=" . evil-numbers/inc-at-pt-incremental)
          ("C-c C-+" . evil-numbers/inc-at-pt-incremental)
          ("C-c C--" . evil-numbers/dec-at-pt-incremental)))
+(use-package evil-cleverparens
+  :hook ((lisp-mode emacs-lisp-mode) . evil-cleverparens-mode)
+  :custom
+  (evil-cleverparens-use-s-and-S nil))
 
+;; make lisp editing nicer
 (use-package aggressive-indent
   :hook (prog-mode . aggressive-indent-mode)
   :config
   (add-to-list 'aggressive-indent-protected-commands
                #'evil-undo))
 
+;; and nicer
 (use-package adjust-parens
   :hook (prog-mode . adjust-parens-mode))
 
@@ -455,7 +461,7 @@ visual states."
   :hook (minibuffer-setup . my/consult-setup-minibuffer-completion)
   :init
   (defun my/consult-setup-minibuffer-completion ()
-      (setq-local completion-in-region-function #'consult-completion-in-region))
+    (setq-local completion-in-region-function #'consult-completion-in-region))
   (evil-declare-motion #'consult-line))
 (use-package consult-eglot
   :commands consult-eglot-symbols)
@@ -971,7 +977,7 @@ COMMAND and COMINT are like `compile'."
 (use-package sly
   :hook (lisp-mode . my/-lisp-mode-autoconnect-sly)
   :bind (:map sly-mode-map
-         ("C-c e" . my/sly-show-notes-at-point))
+              ("C-c e" . my/sly-show-notes-at-point))
   :autoload sly-connected-p
   :init
   (defun my/-lisp-mode-autoconnect-sly ()