From: Jonas Bernoulli <jonas@bernoul.li>
Date: Mon, 25 Oct 2021 18:15:28 +0000 (+0200)
Subject: ; Revert parts of "Use string-search instead of string-match[-p]"
X-Git-Tag: emacs-28.0.90~179
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=214c2e268c8422a13c463a1d45be9fb2fe63d0fe;p=emacs.git

; Revert parts of "Use string-search instead of string-match[-p]"

"transient.el" is also distributed as a separate package, which
supports Emacs versions as old as 25.1 (see "Package-Requires").
---

diff --git a/lisp/transient.el b/lisp/transient.el
index 77bf41deba8..2adb4c573ee 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -3073,7 +3073,7 @@ Optional support for popup buttons is also implemented here."
               ;; the definition, then we want to drop the space that
               ;; is reinserted above.  False-positives are possible
               ;; for silly bindings like "-C-c C-c".
-              (unless (string-search " " key)
+              (unless (string-match-p " " key)
                 (setq pre (string-replace " " "" pre))
                 (setq suf (string-replace " " "" suf)))
               (concat (propertize pre 'face 'default)