[nongnu] elpa/evil-lisp-state 9f10498f6d 108/125: Add key bindings for hybrid functions

[ELPA Syncer]

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

    Add key bindings for hybrid functions
---
 README.md          |  4 ++++
 evil-lisp-state.el | 10 +++++++++-
 2 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 9c925643ab..321323aec3 100644
--- a/README.md
+++ b/README.md
@@ -65,6 +65,10 @@ Key Binding                 | Function
 <kbd>\<leader\> m (</kbd>   | insert expression before (same level as current 
one)
 <kbd>\<leader\> m )</kbd>   | insert expression after (same level as current 
one)
 <kbd>\<leader\> m $</kbd>   | go to the end of current sexp
+<kbd>\<leader\> m ` k</kbd> | hybrid version of kill sexp (can be used in non 
lisp dialects)
+<kbd>\<leader\> m ` p</kbd> | hybrid version of push sexp (can be used in non 
lisp dialects)
+<kbd>\<leader\> m ` s</kbd> | hybrid version of slurp sexp (can be used in non 
lisp dialects)
+<kbd>\<leader\> m ` t</kbd> | hybrid version of transpose sexp (can be used in 
non lisp dialects)
 <kbd>\<leader\> m 0</kbd>   | go to the beginning of current sexp
 <kbd>\<leader\> m a</kbd>   | absorb expression
 <kbd>\<leader\> m b</kbd>   | forward barf expression
diff --git a/evil-lisp-state.el b/evil-lisp-state.el
index 60093ebd98..952945a9c1 100644
--- a/evil-lisp-state.el
+++ b/evil-lisp-state.el
@@ -5,7 +5,7 @@
 ;; Author: Sylvain Benner <sylvain.benner@gmail.com>
 ;; Keywords: convenience editing evil smartparens lisp mnemonic
 ;; Created: 9 Oct 2014
-;; Version: 7.0
+;; Version: 7.1
 ;; Package-Requires: ((evil "1.0.9") (evil-leader "0.4.3") (smartparens 
"1.6.1"))
 ;; URL: https://github.com/syl20bnr/evil-lisp-state
 
@@ -49,6 +49,10 @@
 ;; `leader m ('   | insert expression before (same level as current one)
 ;; `leader m )'   | insert expression after (same level as current one)
 ;; `leader m $'   | go to the end of current sexp
+;; `leader m ` k' | hybrid version of kill sexp (can be used in non lisp 
dialects)
+;; `leader m ` p' | hybrid version of push sexp (can be used in non lisp 
dialects)
+;; `leader m ` s' | hybrid version of slurp sexp (can be used in non lisp 
dialects)
+;; `leader m ` t' | hybrid version of transpose sexp (can be used in non lisp 
dialects)
 ;; `leader m 0'   | go to the beginning of current sexp
 ;; `leader m a'   | absorb expression
 ;; `leader m b'   | forward barf expression
@@ -174,6 +178,10 @@ If `evil-lisp-state-global' is non nil then this variable 
has no effect."
     ("("   . lisp-state-insert-sexp-before)
     (")"   . lisp-state-insert-sexp-after)
     ("$"   . sp-end-of-sexp)
+    ("`k"  . sp-kill-hybrid-sexp)
+    ("`p"  . sp-push-hybrid-sexp)
+    ("`s"  . sp-slurp-hybrid-sexp)
+    ("`t"  . sp-transpose-hybrid-sexp)
     ("0"   . lisp-state-beginning-of-sexp)
     ("1"   . digit-argument)
     ("2"   . digit-argument)