branch: elpa/evil-lisp-state
commit 46fbe7ade7d97201b23a53574ad8559092bd92c7
Author: syl20bnr <[email protected]>
Commit: syl20bnr <[email protected]>
Keep `a` for evil-append, absorb-sexp is now on `A`
---
README.md | 3 ++-
evil-lisp-state.el | 3 ++-
2 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/README.md b/README.md
index 124d0095bc..e1c59ef569 100644
--- a/README.md
+++ b/README.md
@@ -105,7 +105,8 @@ Key Binding | Function
`%` | evil-jump-item (use it to go to the end of sexp)
`$` | sp-end-of-sexp
`0` | sp-beginning-of-sexp
-`a` | sp-absorb-sexp
+`a` | evil-append
+`A` | sp-absorb-sexp
`b` | sp-forward-barf-sexp
`<tab>b` | sp-backward-barf-sexp
`c` | sp-convolute-sexp
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index 2607fae608..c73c7ce8ca 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -104,7 +104,8 @@ of COMMAND.
(define-key evil-lisp-state-map "9" 'digit-argument)
(define-key evil-lisp-state-map "$" 'sp-end-of-sexp)
(define-key evil-lisp-state-map "0" 'sp-beginning-of-sexp)
-(define-key evil-lisp-state-map "a" 'sp-absorb-sexp)
+(define-key evil-lisp-state-map "a" 'evil-append)
+(define-key evil-lisp-state-map "A" 'sp-absorb-sexp)
(evil-lisp-state-define-key "b" forward-barf-sexp t)
(define-key evil-lisp-state-map "c" 'sp-convolute-sexp)
(define-key evil-lisp-state-map "C" 'sp-comment)
