[nongnu] elpa/evil-goggles bf1be3be24 018/225: Don't show overlay on whitespaces-only regions

[ELPA Syncer]

branch: elpa/evil-goggles
commit bf1be3be2418e5546defedfd8e18f6c7c232f9c2
Author: Evgeni Kolev <evgenysw@gmail.com>
Commit: Evgeni Kolev <evgenysw@gmail.com>

    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