branch: elpa/evil-lisp-state
commit 7bd49350dfb48c0f9832426884e6f3b751e5e800
Author: syl20bnr <[email protected]>
Commit: syl20bnr <[email protected]>
Change sp-absorb-sexp binding to `B`
And keep `A` bound to evil-append-line
---
README.md | 3 ++-
evil-lisp-state.el | 3 ++-
2 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/README.md b/README.md
index 9412fc17ca..eef8a04f3a 100644
--- a/README.md
+++ b/README.md
@@ -107,6 +107,7 @@ the sexp.
Key Binding | Function
--------------|------------------------------------------------------------
`a` | evil-append
+`A` | evil-append-line
`c` | evil-change
`d` | evil-delete
`h` | next char
@@ -138,8 +139,8 @@ Key Binding | Function
`)` | insert sibling after sexp and switch to `insert state`
`$` | sp-end-of-sexp
`0` | sp-beginning-of-sexp
-`A` | sp-absorb-sexp
`b` | sp-forward-barf-sexp
+`B` | sp-absorb-sexp
`<tab> b` | sp-backward-barf-sexp
`C` | sp-convolute-sexp
`Dd` | sp-kill-hybrid-sexp
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index 1042aa4a2b..a5d814e1b0 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -121,6 +121,7 @@ of COMMAND.
(define-key evil-lisp-state-map "8" 'digit-argument)
(define-key evil-lisp-state-map "9" 'digit-argument)
(define-key evil-lisp-state-map "a" 'evil-append)
+(define-key evil-lisp-state-map "A" 'evil-append-line)
(define-key evil-lisp-state-map "c" 'evil-change)
(define-key evil-lisp-state-map "d" 'evil-delete)
(define-key evil-lisp-state-map "h" 'evil-backward-char)
@@ -145,8 +146,8 @@ of COMMAND.
(define-key evil-lisp-state-map ")" 'evil-lisp-state-insert-sexp-after)
(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)
(evil-lisp-state-define-key "b" forward-barf-sexp t)
+(define-key evil-lisp-state-map "B" 'sp-absorb-sexp)
(define-key evil-lisp-state-map "C" 'sp-convolute-sexp)
(define-key evil-lisp-state-map "Dd" 'sp-kill-hybrid-sexp)
(evil-lisp-state-define-key "Dx" kill-sexp t)
