Add key bindings for navigation

Resolve #9

README.md

@@ -83,19 +83,22 @@ Key Binding                 | Function
 <kbd>\<leader\> m e</kbd>   | unwrap current expression and kill all symbols after point
 <kbd>\<leader\> m E</kbd>   | unwrap current expression and kill all symbols before point
 <kbd>\<leader\> m h</kbd>   | previous symbol
+<kbd>\<leader\> m H</kbd>   | go to previous sexp
 <kbd>\<leader\> m i</kbd>   | switch to `insert state`
 <kbd>\<leader\> m I</kbd>   | go to beginning of current expression and switch to `insert state`
 <kbd>\<leader\> m j</kbd>   | next closing parenthesis
 <kbd>\<leader\> m J</kbd>   | join expression
 <kbd>\<leader\> m k</kbd>   | previous opening parenthesis
 <kbd>\<leader\> m l</kbd>   | next symbol
+<kbd>\<leader\> m L</kbd>   | go to next sexp
 <kbd>\<leader\> m p</kbd>   | paste after
 <kbd>\<leader\> m P</kbd>   | paste before
 <kbd>\<leader\> m r</kbd>   | raise expression (replace parent expression by current one)
 <kbd>\<leader\> m s</kbd>   | forwared slurp expression
 <kbd>\<leader\> m S</kbd>   | backward slurp expression
 <kbd>\<leader\> m t</kbd>   | transpose expression
 <kbd>\<leader\> m u</kbd>   | undo
+<kbd>\<leader\> m U</kbd>   | got to parent sexp backward
 <kbd>\<leader\> m C-r</kbd> | redo
 <kbd>\<leader\> m v</kbd>   | switch to `visual state`
 <kbd>\<leader\> m V</kbd>   | switch to `visual line state`

evil-lisp-state.el

@@ -64,19 +64,22 @@
 ;; `leader m e'   | (splice) unwrap current expression and kill all symbols after point
 ;; `leader m E'   | (splice) unwrap current expression and kill all symbols before point
 ;; `leader m h'   | previous symbol
+;; `leader m H'   | go to previous sexp
 ;; `leader m i'   | switch to `insert state`
 ;; `leader m I'   | go to beginning of current expression and switch to `insert state`
 ;; `leader m j'   | next closing parenthesis
 ;; `leader m J'   | join expression
 ;; `leader m k'   | previous opening parenthesis
 ;; `leader m l'   | next symbol
+;; `leader m L'   | go to next sexp
 ;; `leader m p'   | paste after
 ;; `leader m P'   | paste before
 ;; `leader m r'   | raise expression (replace parent expression by current one)
 ;; `leader m s'   | forwared slurp expression
 ;; `leader m S'   | backward slurp expression
 ;; `leader m t'   | transpose expression
 ;; `leader m u'   | undo
+;; `leader m U'   | got to parent sexp backward
 ;; `leader m C-r' | redo
 ;; `leader m v'   | switch to `visual state`
 ;; `leader m V'   | switch to `visual line state`
@@ -205,19 +208,22 @@ If `evil-lisp-state-global' is non nil then this variable has no effect."
     ("e"   . sp-splice-sexp-killing-forward)
     ("E"   . sp-splice-sexp-killing-backward)
     ("h"   . sp-backward-symbol)
+    ("H"   . sp-backward-sexp)
     ("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)
+    ("L"   . sp-forward-sexp)
     ("p"   . evil-paste-after)
     ("P"   . evil-paste-before)
     ("r"   . sp-raise-sexp)
     ("s"   . sp-forward-slurp-sexp)
     ("S"   . sp-backward-slurp-sexp)
     ("t"   . sp-transpose-sexp)
     ("u"   . undo-tree-undo)
+    ("U"   . sp-backward-up-sexp)
     ("C-r" . undo-tree-redo)
     ("v"   . evil-visual-char)
     ("V"   . evil-visual-line)