     ("8"   . digit-argument)
     ("9"   . digit-argument)
     ("a"   . sp-absorb-sexp)
-    ("A"   . sp-transpose-sexp)
     ("b"   . sp-forward-barf-sexp)
     ("B"   . sp-backward-barf-sexp)
     ("c"   . sp-convolute-sexp)
+    ("ds"  . sp-kill-symbol)
+    ("Ds"  . sp-backward-kill-symbol)
+    ("dw"  . sp-kill-word)
+    ("Dw"  . sp-backward-kill-word)
+    ("dx"  . sp-kill-sexp)
+    ("Dx"  . sp-backward-kill-sexp)
     ("h"   . sp-backward-symbol)
     ("i"   . evil-insert-state)
     ("I"   . evil-insert-line)
     ("j"   . lisp-state-next-closing-paren)
+    ("J"   . sp-join-sexp)
     ("k"   . lisp-state-prev-opening-paren)
     ("l"   . lisp-state-forward-symbol)
-    ("m"   . sp-join-sexp)
-    ("n"   . sp-forward-slurp-sexp)
-    ("N"   . sp-backward-slurp-sexp)
     ("p"   . evil-past-after)
     ("P"   . evil-past-before)
-    ("q"   . sp-splice-sexp-killing-forward)
-    ("Q"   . sp-splice-sexp-killing-backward)
     ("r"   . sp-raise-sexp)
+    ("s"   . sp-forward-slurp-sexp)
+    ("S"   . sp-backward-slurp-sexp)
+    ("C-s" . sp-splice-sexp-killing-forward)
+    ("C-S" . sp-splice-sexp-killing-backward)
+    ("t"   . sp-transpose-sexp)
     ("u"   . undo-tree-undo)
     ("C-r" . undo-tree-redo)
     ("v"   . evil-visual-char)

    ("C-v" . evil-visual-block)
    ("w"   . lisp-state-wrap)
    ("W"   . sp-unwrap-sexp)
    ("xs"  . sp-kill-symbol)
    ("Xs"  . sp-backward-kill-symbol)
    ("xw"  . sp-kill-word)
    ("Xw"  . sp-backward-kill-word)
    ("xx"  . sp-kill-sexp)
    ("Xx"  . sp-backward-kill-sexp)
    ("y"   . sp-copy-sexp))
  "alist of keys and commands in lisp state.")
(dolist (x evil-lisp-state-commands)

;; `leader m C-v' | switch to `visual block state`
;; `leader m w'   | wrap expression with parenthesis
;; `leader m W'   | unwrap expression
;; `leader m y'   | copy expression

;; Configuration:
