branch: elpa/evil-goggles
commit 4645be7ac2837949b4f848d8d583f5ff9b7b50dc
Author: Evgeni Kolev <[email protected]>
Commit: Evgeni Kolev <[email protected]>
Fix block hint using only the bg of the face, ignoring the fg
---
evil-goggles.el | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/evil-goggles.el b/evil-goggles.el
index e127a8eaad..8ada3c757d 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -244,15 +244,13 @@ Pulsing the overlay isn't supported.
Running code while the hint is on isn't supported."
;; NOTE both of the limitation stated above can likely be addressed
;; if needed
- (let ((ovs)
- (dur (or dur evil-goggles-blocking-duration evil-goggles-duration))
- (overlay-face `(:background ,(evil-goggles--face-background face))))
;; TODO drop this var
+ (let ((ovs))
(unwind-protect
(progn
;; create multiple overlays, one for each line in the block
(evil-apply-on-block (lambda (line-beg line-end)
(add-to-list 'ovs
- (evil-goggles--make-overlay
line-beg line-end 'face overlay-face)))
+ (evil-goggles--make-overlay
line-beg line-end 'face face)))
beg end nil)
;; TODO add support for pulsing a vertical block
;; (dolist (ov ovs) (evil-goggles--show-or-pulse-overlay ov face
dur))
