diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2016-01-30 09:03:03 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2016-01-30 11:37:18 +0000 |
commit | 9dcbae42f9177eb2e1f3634d5ae12b1ac8942f9b (patch) | |
tree | ec8e71caafb980f15ce87cf1c5e055827a13bae6 /cider-interaction.el | |
parent | 0af1fad3e694ad173ad782aaaa36ab9889ab5e41 (diff) |
Clear overlays from any code that's evaluated
Diffstat (limited to 'cider-interaction.el')
-rw-r--r-- | cider-interaction.el | 2 |
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)) |