diff options
| -rw-r--r-- | lisp/isearch.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index 612af7e0ecd..2f17af43c14 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -1957,9 +1957,8 @@ If there is no completion possible, say so and continue searching." | |||
| 1957 | (concat " [" current-input-method-title "]: ") | 1957 | (concat " [" current-input-method-title "]: ") |
| 1958 | ": ") | 1958 | ": ") |
| 1959 | ))) | 1959 | ))) |
| 1960 | (apply 'propertize | 1960 | (propertize (concat (upcase (substring m 0 1)) (substring m 1)) |
| 1961 | (concat (upcase (substring m 0 1)) (substring m 1)) | 1961 | 'face 'minibuffer-prompt))) |
| 1962 | minibuffer-prompt-properties))) | ||
| 1963 | 1962 | ||
| 1964 | (defun isearch-message-suffix (&optional c-q-hack ellipsis) | 1963 | (defun isearch-message-suffix (&optional c-q-hack ellipsis) |
| 1965 | (concat (if c-q-hack "^Q" "") | 1964 | (concat (if c-q-hack "^Q" "") |