procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
"transient.el" is also distributed as a separate package, which
supports Emacs versions as old as 25.1 (see "Package-Requires").
This commit is contained in:
Jonas Bernoulli 2021-10-25 20:15:28 +02:00
parent a2c17e115e
commit 214c2e268c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/transient.el
View file

@ -3073,7 +3073,7 @@ Optional support for popup buttons is also implemented here."
;; the definition, then we want to drop the space that ;; the definition, then we want to drop the space that
;; is reinserted above. False-positives are possible ;; is reinserted above. False-positives are possible
;; for silly bindings like "-C-c C-c". ;; for silly bindings like "-C-c C-c".
(unless (string-search " " key) (unless (string-match-p " " key)
(setq pre (string-replace " " "" pre)) (setq pre (string-replace " " "" pre))
(setq suf (string-replace " " "" suf))) (setq suf (string-replace " " "" suf)))
(concat (propertize pre 'face 'default) (concat (propertize pre 'face 'default)