branch: elpa/evil-goggles
commit bf1be3be2418e5546defedfd8e18f6c7c232f9c2
Author: Evgeni Kolev <[email protected]>
Commit: Evgeni Kolev <[email protected]>
Don't show overlay on whitespaces-only regions
---
evil-goggles.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/evil-goggles.el b/evil-goggles.el
index ae254e68a9..73b9ab0d4e 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -77,7 +77,9 @@
(<= (point-min) beg end)
(>= (point-max) end beg)
(not (evil-visual-state-p))
- (not (evil-insert-state-p))))
+ (not (evil-insert-state-p))
+ ;; don't show overlay when the region has nothing but whitespace
+ (not (string-match "^[ \t\n]+$" (buffer-substring-no-properties beg
end)))))
(defun evil-goggles--evil-delete-advice (orig-fun beg end &optional type
register yank-handler)
(evil-goggles--with-goggles beg end 'evil-delete
