branch: elpa/evil-goggles
commit 0afe8cf165e9a8d2eb630b8b2b774617784bbe6f
Author: Evgeni Kolev <[email protected]>
Commit: Evgeni Kolev <[email protected]>
Fix no-whitespace check
---
evil-goggles.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/evil-goggles.el b/evil-goggles.el
index 1ffaaf2ff4..3cb79a843a 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -81,7 +81,7 @@
(not (evil-visual-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)))))
+ (not (null (string-match-p "[^ \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