[nongnu] elpa/evil-lisp-state 24b9a1dfb6 038/125: Add sp-(backward)-delete-char bindings to `x` and `X`

[ELPA Syncer]

branch: elpa/evil-lisp-state
commit 24b9a1dfb6fbaef74a16944145265461c5e82cbc
Author: syl20bnr <sylvain.benner@gmail.com>
Commit: syl20bnr <sylvain.benner@gmail.com>

    Add sp-(backward)-delete-char bindings to `x` and `X`
---
 README.md          | 2 ++
 evil-lisp-state.el | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/README.md b/README.md
index 89edc92183..1a53a4b315 100644
--- a/README.md
+++ b/README.md
@@ -101,6 +101,8 @@ Key Binding   | Function
 `U`           | sp-unwrap-sexp
 `nU`          | sp-backward-unwrap-sexp
 `y`           | sp-copy-sexp
+`x`           | sp-delete-char
+`X`           | sp-backward-delete-char
 `ny`          | sp-backward-copy-sexp
 `RET`         | sp-newline
 `ESC`         | evil-normal-state
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index 4e05fff964..c020dd747e 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -126,6 +126,8 @@ of COMMAND.
 (define-key evil-lisp-state-map "T"   'sp-transpose-hybrid-sexp)
 (define-key evil-lisp-state-map "u"   'undo-tree-undo)
 (evil-lisp-state-define-key     "U"    unwrap-sexp t)
+(define-key evil-lisp-state-map "x"   'sp-delete-char)
+(define-key evil-lisp-state-map "X"   'sp-backward-delete-char)
 (evil-lisp-state-define-key     "y"    copy-sexp t)
 (define-key evil-lisp-state-map (kbd "DEL") 'evil-backward-char)
 (define-key evil-lisp-state-map (kbd "RET") 'sp-newline)