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)

Reply via email to