branch: elpa/evil-lisp-state
commit 77b8cc7bd83de3d5ce83529acaeae6fae38f69f9
Author: syl20bnr <[email protected]>
Commit: syl20bnr <[email protected]>
Add key binding `(` which switches to insert state and insert `(`
---
README.md | 1 +
evil-lisp-state.el | 1 +
2 files changed, 2 insertions(+)
diff --git a/README.md b/README.md
index 3e56df28d8..0e5d8d5784 100644
--- a/README.md
+++ b/README.md
@@ -82,6 +82,7 @@ to default `n`):
Key Binding | Function
--------------|------------------------------------------------------------
+`(` | switch to `insert state` and insert "("
`$` | sp-end-of-sexp
`0` | sp-beginning-of-sexp
`a` | sp-absorb-sexp
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index fe0a11a8fa..6c5787b987 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -83,6 +83,7 @@ of COMMAND.
(define-key evil-lisp-state-map bkey bcmdsym)))))
;; key bindings
+(define-key evil-lisp-state-map "(" (lambda () (interactive) (evil-insert
"(")))
(define-key evil-lisp-state-map "1" 'digit-argument)
(define-key evil-lisp-state-map "2" 'digit-argument)
(define-key evil-lisp-state-map "3" 'digit-argument)