From 28adf374fee6739ee7ed95bbb43e3b1a68701977 Mon Sep 17 00:00:00 2001
From: Jonathan Chen <11434205+dijonkitchen@users.noreply.github.com>
Date: Wed, 3 Jul 2019 15:06:11 -0700
Subject: [PATCH] feat(clojure-lang): add `cider-eval-sexp-at-point`

Adds a useful CIDER command that doesn't have an idiomatic Spacemacs command.

Ref:
https://cider.readthedocs.io/en/latest/interactive_programming/#using-cider-mode
---
 CHANGELOG.develop                | 1 +
 layers/+lang/clojure/README.org  | 1 +
 layers/+lang/clojure/packages.el | 1 +
 3 files changed, 3 insertions(+)

diff --git a/CHANGELOG.develop b/CHANGELOG.develop
index 89387e9db..be169cf68 100644
--- a/CHANGELOG.develop
+++ b/CHANGELOG.develop
@@ -1184,6 +1184,7 @@ Other:
     (thanks to John Stevenson)
   - ~SPC m e i~ interrupt the current evaluation (stop long running process)
     (thanks to John Stevenson)
+  - ~SPC m e v~ to evaluate s-expression at point (=cider-eval-sexp-at-point=)
 - Fixes:
   - Remove `cider.nrepl/cider-middleware` in lein quick start setting
   - Fixed =cider-inspector-prev-page= binding, also add ~p~ as another key
diff --git a/layers/+lang/clojure/README.org b/layers/+lang/clojure/README.org
index d29b3d55a..4c927089b 100644
--- a/layers/+lang/clojure/README.org
+++ b/layers/+lang/clojure/README.org
@@ -258,6 +258,7 @@ As this state works the same for all files, the documentation is in global
 | ~SPC m e p~ | print last sexp (clojure interaction mode only)           |
 | ~SPC m e P~ | eval last sexp and pretty print result in separate buffer |
 | ~SPC m e u~ | Undefine a symbol from the current namespace              |
+| ~SPC m e v~ | eval sexp around point                                    |
 | ~SPC m e w~ | eval last sexp and replace with result                    |
 
 *** Goto
diff --git a/layers/+lang/clojure/packages.el b/layers/+lang/clojure/packages.el
index d086f98e6..53d966afe 100644
--- a/layers/+lang/clojure/packages.el
+++ b/layers/+lang/clojure/packages.el
@@ -89,6 +89,7 @@
             "eP" 'cider-pprint-eval-last-sexp
             "er" 'cider-eval-region
             "eu" 'cider-undef
+            "ev" 'cider-eval-sexp-at-point
             "ew" 'cider-eval-last-sexp-and-replace
 
             "="  'cider-format-buffer