branch: elpa/evil
commit e7f170fb1f08662b5a4165adc23d84858129e3ef
Author: William G Hatch <will...@hatch.uno>
Commit: Axel Forsman <axels...@gmail.com>
Advise read-key as well as read-key-sequence
---
evil-repeat.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/evil-repeat.el b/evil-repeat.el
index 73cd2da307..a33d0e9614 100644
--- a/evil-repeat.el
+++ b/evil-repeat.el
@@ -636,7 +636,7 @@ If COUNT is negative, this is a more recent kill."
(not evil-repeat-move-cursor)))
(evil-repeat-pop (- count) save-point))
-(defadvice read-key-sequence (before evil activate)
+(defun evil--read-key-sequence-advice ()
"Record `this-command-keys' before it is reset."
(when (and (evil-repeat-recording-p)
evil-recording-current-command)
@@ -644,6 +644,11 @@ If COUNT is negative, this is a more recent kill."
(if (functionp repeat-type)
(funcall repeat-type 'post)))))
+(defadvice read-key-sequence (before evil activate)
+ (evil--read-key-sequence-advice))
+(defadvice read-key-sequence-vector (before evil activate)
+ (evil--read-key-sequence-advice))
+
(provide 'evil-repeat)
;;; evil-repeat.el ends here
