From: Mattias Engdegård <mattiase@acm.org>
Date: Tue, 24 Aug 2021 13:57:07 +0000 (+0200)
Subject: ; * lisp/repeat.el (repeat-echo-message): Use `string-search`.
X-Git-Tag: emacs-28.0.90~1328
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=862051236137801189ffd3b6e313ef7b71403e6a;p=emacs.git

; * lisp/repeat.el (repeat-echo-message): Use `string-search`.
---

diff --git a/lisp/repeat.el b/lisp/repeat.el
index 054eacf8ec9..89488ddc98f 100644
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -474,7 +474,7 @@ When Repeat mode is enabled, and the command symbol has the property named
         (if (current-message)
             (message "%s [%s]" (current-message) mess)
           (message mess)))
-    (when (string-match-p "Repeat with " (current-message))
+    (when (string-search "Repeat with " (current-message))
       (message nil))))
 
 (defvar repeat-echo-mode-line-string