[nongnu] elpa/evil-escape 8f8b58db5e 121/133: Fix compiler warnings

[ELPA Syncer]

branch: elpa/evil-escape
commit 8f8b58db5e23ef0b4f5e42bf7e814bfb58669a9c
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix compiler warnings
---
 evil-escape.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/evil-escape.el b/evil-escape.el
index 0434ab2b57..257e4b2f97 100644
--- a/evil-escape.el
+++ b/evil-escape.el
@@ -203,9 +203,11 @@ with a key sequence."
            (t (setq unread-command-events
                     (append unread-command-events (list evt)))))))))
 
-(defadvice evil-repeat (around evil-escape-repeat-info activate)
+(defun evil-escape--evil-repeat (fn &rest args)
+  "Bind `evil-escape-inhibit' to t."
   (let ((evil-escape-inhibit t))
-    ad-do-it))
+    (apply fn args)))
+(advice-add 'evil-repeat :around #'evil-escape--evil-repeat)
 
 (defun evil-escape-p ()
   "Return non-nil if evil-escape can run."
@@ -300,7 +302,7 @@ with a key sequence."
         (`normal
          (when (window-minibuffer-p) (evil-escape--insert-func) t))
         (`iedit-insert (evil-escape--insert-func) t))
-    ('error nil)))
+    (error nil)))
 
 (defun evil-escape--insert-2 ()
   "Insert character while taking into account mode specificites."