Skip to content

Commit 3f3607f

Browse files
danskardabbatsov
authored andcommitted
Use returned ns, not a magic match-string
1 parent c1251c0 commit 3f3607f

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

cider-eval.el

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1334,11 +1334,11 @@ buffer, else display in a popup buffer."
13341334
"Evaluate the current buffer's namespace form.
13351335
When UNDEF-ALL is non-nil, unmap all symbols and aliases first."
13361336
(interactive "P")
1337-
(when (clojure-find-ns)
1337+
(when-let ((ns (clojure-find-ns)))
13381338
(save-excursion
13391339
(goto-char (match-beginning 0))
13401340
(when undef-all
1341-
(cider-undef-all (match-string 0)))
1341+
(cider-undef-all ns))
13421342
(cider-eval-defun-at-point))))
13431343

13441344
(defun cider-read-and-eval (&optional value)

0 commit comments

Comments
 (0)