emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/evil-lisp-state 4167ee0b21 015/125: Add `RET` key binding


From: ELPA Syncer
Subject: [nongnu] elpa/evil-lisp-state 4167ee0b21 015/125: Add `RET` key binding for sp-newline
Date: Thu, 6 Jan 2022 04:58:38 -0500 (EST)

branch: elpa/evil-lisp-state
commit 4167ee0b2151b6595c40d834fb628f7e8b47a9eb
Author: sbenner <sylvain.benner@gmail.com>
Commit: sbenner <sylvain.benner@gmail.com>

    Add `RET` key binding for sp-newline
---
 README.md          |  1 +
 evil-lisp-state.el | 10 ++++++----
 2 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/README.md b/README.md
index 7301e0b7ac..9e0f79b1dd 100644
--- a/README.md
+++ b/README.md
@@ -61,6 +61,7 @@ Key Binding   | Function
 `sl`          | sp-forward-slurp-sexp
 `sx`          | sp-splice-sexp
 `u`           | undo-tree-undo
+`RET`         | sp-newline
 `ESC`         | evil-normal-state
 
 ## Thanks
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index a315488cf8..df5c8a0186 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -84,14 +84,16 @@
 (define-key evil-lisp-state-map "l"   'sp-forward-sexp)
 (define-key evil-lisp-state-map "r"   'sp-raise-sexp)
 (define-key evil-lisp-state-map "C-r" 'undo-tree-redo)
-(define-key evil-lisp-state-map "ska"  'sp-splice-sexp-killing-around)
-(define-key evil-lisp-state-map "skh"  'sp-splice-sexp-killing-backward)
-(define-key evil-lisp-state-map "skl"  'sp-splice-sexp-killing-forward)
+(define-key evil-lisp-state-map "ska" 'sp-splice-sexp-killing-around)
+(define-key evil-lisp-state-map "skh" 'sp-splice-sexp-killing-backward)
+(define-key evil-lisp-state-map "skl" 'sp-splice-sexp-killing-forward)
 (define-key evil-lisp-state-map "sh"  'sp-backward-slurp-sexp)
 (define-key evil-lisp-state-map "sl"  'sp-forward-slurp-sexp)
 (define-key evil-lisp-state-map "sx"  'sp-splice-sexp)
 (define-key evil-lisp-state-map "u"   'undo-tree-undo)
-(define-key evil-lisp-state-map [escape] 'evil-normal-state)
+
+(define-key evil-lisp-state-map (kbd "RET") 'sp-newline)
+(define-key evil-lisp-state-map [escape]    'evil-normal-state)
 
 (defun evil-lisp-state-eval-sexp-end-of-line ()
   "Evaluate the last sexp at the end of the current line."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]