branch: elpa/cider
commit 3f3607f38cecc2059176b87c43729308da7e345f
Author: Daniel Skarda <dan.ska...@gmail.com>
Commit: Bozhidar Batsov <bozhi...@batsov.dev>
Use returned ns, not a magic match-string
---
cider-eval.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/cider-eval.el b/cider-eval.el
index 3c5c7b547c..223d81b791 100644
--- a/cider-eval.el
+++ b/cider-eval.el
@@ -1334,11 +1334,11 @@ buffer, else display in a popup buffer."
"Evaluate the current buffer's namespace form.
When UNDEF-ALL is non-nil, unmap all symbols and aliases first."
(interactive "P")
- (when (clojure-find-ns)
+ (when-let ((ns (clojure-find-ns)))
(save-excursion
(goto-char (match-beginning 0))
(when undef-all
- (cider-undef-all (match-string 0)))
+ (cider-undef-all ns))
(cider-eval-defun-at-point))))
(defun cider-read-and-eval (&optional value)
