[nongnu] elpa/evil e7f170fb1f 1/2: Advise read-key as well as read-key-sequence

[ELPA Syncer]

branch: elpa/evil
commit e7f170fb1f08662b5a4165adc23d84858129e3ef
Author: William G Hatch <william@hatch.uno>
Commit: Axel Forsman <axelsfor@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