diff options
| author | Juri Linkov <juri@linkov.net> | 2019-07-05 22:11:34 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2019-07-05 22:11:34 +0300 |
| commit | dde0320020429a2d2917895fc0e2f5a24ffe6348 (patch) | |
| tree | 565e314230e08f4334fc7c484322f1a5d3672270 /lisp/term | |
| parent | 44f199648b0c986a0ac7608f4e9d803c619ae2d6 (diff) | |
| download | emacs-dde0320020429a2d2917895fc0e2f5a24ffe6348.tar.gz | |
* lisp/replace.el (replace-highlight): Add save-match-data (bug#36328)
* lisp/term/tty-colors.el (tty-color-canonicalize):
Replace string-match with string-match-p.
Thanks to Jayden Navarro <jayden@yugabyte.com> and Alan Mackenzie <acm@muc.de>
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/tty-colors.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/term/tty-colors.el b/lisp/term/tty-colors.el index 307586f2213..5af8170203e 100644 --- a/lisp/term/tty-colors.el +++ b/lisp/term/tty-colors.el @@ -820,7 +820,7 @@ Value is the modified color alist for FRAME." "Return COLOR in canonical form. A canonicalized color name is all-lower case, with any blanks removed." (let ((case-fold-search nil)) - (if (string-match "[A-Z ]" color) + (if (string-match-p "[A-Z ]" color) (replace-regexp-in-string " +" "" (downcase color)) color))) |