branch: elpa/evil-goggles
commit 580b219de6d832584cd527488f73690ca5e9d2d0
Author: Evgeni Kolev <[email protected]>
Commit: Evgeni Kolev <[email protected]>
Add `S` hint
---
evil-goggles.el | 33 ++++++++++++++++-----------------
1 file changed, 16 insertions(+), 17 deletions(-)
diff --git a/evil-goggles.el b/evil-goggles.el
index 904cec0824..468cf32d3d 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -377,10 +377,11 @@ OFF-BY-DEFAULT if non-nil will set the switch to `nil'"
;;; assosiation list with faces
(defvar evil-goggles--faces
- '((evil-delete :face evil-goggles-delete-face)
- (evil-yank :face evil-goggles-yank-face)
- (evil-indent :face evil-goggles-indent-face)
- (evil-change :face evil-goggles-change-face)))
+ '((evil-delete :face evil-goggles-delete-face)
+ (evil-yank :face evil-goggles-yank-face)
+ (evil-indent :face evil-goggles-indent-face)
+ (evil-change-whole-line :face evil-goggles-change-face)
+ (evil-change :face evil-goggles-change-face)))
;;; minor mode defined below ;;;
@@ -399,19 +400,17 @@ OFF-BY-DEFAULT if non-nil will set the switch to `nil'"
(if evil-goggles-mode
(progn
(add-hook 'pre-command-hook #'evil-goggles--vanish)
- (when evil-goggles-enable-delete
- (advice-add 'evil-delete :before
'evil-goggles--generic-blocking-advice))
- (when evil-goggles-enable-yank
- (advice-add 'evil-yank :before
'evil-goggles--generic-blocking-advice))
- (when evil-goggles-enable-change
- (advice-add 'evil-change :before
'evil-goggles--generic-blocking-advice))
- (when evil-goggles-enable-indent
- (advice-add 'evil-indent :before
'evil-goggles--generic-async-advice)))
- (remove-hook 'pre-command-hook #'evil-goggles--vanish)
- (advice-remove 'evil-delete 'evil-goggles--generic-blocking-advice)
- (advice-remove 'evil-yak 'evil-goggles--generic-blocking-advice)
- (advice-remove 'evil-change 'evil-goggles--generic-blocking-advice)
- (advice-remove 'evil-indent 'evil-goggles--generic-async-advice)))
+ (when evil-goggles-enable-delete (advice-add 'evil-delete
:before 'evil-goggles--generic-blocking-advice))
+ (when evil-goggles-enable-yank (advice-add 'evil-yank
:before 'evil-goggles--generic-blocking-advice))
+ (when evil-goggles-enable-change (advice-add 'evil-change
:before 'evil-goggles--generic-blocking-advice))
+ (when evil-goggles-enable-change (advice-add 'evil-change-whole-line
:before 'evil-goggles--generic-blocking-advice))
+ (when evil-goggles-enable-indent (advice-add 'evil-indent
:before 'evil-goggles--generic-async-advice)))
+ (remove-hook 'pre-command-hook #'evil-goggles--vanish)
+ (advice-remove 'evil-delete
'evil-goggles--generic-blocking-advice)
+ (advice-remove 'evil-yak
'evil-goggles--generic-blocking-advice)
+ (advice-remove 'evil-change
'evil-goggles--generic-blocking-advice)
+ (advice-remove 'evil-change-whole-line
'evil-goggles--generic-blocking-advice)
+ (advice-remove 'evil-indent
'evil-goggles--generic-async-advice)))
(provide 'evil-goggles)