branch: elpa/evil-lisp-state
commit e5792ec68a5615bd07bf2c6e9eb3f49d1bc7810d
Author: syl20bnr <[email protected]>
Commit: syl20bnr <[email protected]>
Add key bindings for navigation
Resolve #9
---
README.md | 3 +++
evil-lisp-state.el | 6 ++++++
2 files changed, 9 insertions(+)
diff --git a/README.md b/README.md
index 321323aec3..cdeb8af6b0 100644
--- a/README.md
+++ b/README.md
@@ -83,12 +83,14 @@ 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)
@@ -96,6 +98,7 @@ Key Binding | Function
<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`
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index 952945a9c1..20bddde671 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -64,12 +64,14 @@
;; `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)
@@ -77,6 +79,7 @@
;; `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,12 +208,14 @@ 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)
@@ -218,6 +223,7 @@ If `evil-lisp-state-global' is non nil then this variable
has no effect."
("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)
