summaryrefslogtreecommitdiff
path: root/cider-interaction.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2016-01-30 09:03:03 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2016-01-30 11:37:18 +0000
commit9dcbae42f9177eb2e1f3634d5ae12b1ac8942f9b (patch)
treeec8e71caafb980f15ce87cf1c5e055827a13bae6 /cider-interaction.el
parent0af1fad3e694ad173ad782aaaa36ab9889ab5e41 (diff)
Clear overlays from any code that's evaluated
Diffstat (limited to 'cider-interaction.el')
-rw-r--r--cider-interaction.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/cider-interaction.el b/cider-interaction.el
index 001708e2..a708d637 100644
--- a/cider-interaction.el
+++ b/cider-interaction.el
@@ -992,6 +992,8 @@ arguments and only proceed with evaluation if it returns nil."
(let ((form (or form (apply #'buffer-substring bounds)))
(start (car-safe bounds))
(end (car-safe (cdr-safe bounds))))
+ (when (and start end)
+ (remove-overlays start end))
(unless (and cider-interactive-eval-override
(functionp cider-interactive-eval-override)
(funcall cider-interactive-eval-override form callback bounds))