2007-03-01 Lennart Borgman <lennart.borgman.073@student.lu.se>

(isearch-message-prefix): Use minibuffer-prompt-properties.
This commit is contained in:
Kim F. Storm 2007-03-01 22:28:14 +00:00
parent 115f38b127
commit 3a5c4810ac

View file

@ -1957,8 +1957,9 @@ If there is no completion possible, say so and continue searching."
(concat " [" current-input-method-title "]: ")
": ")
)))
(propertize (concat (upcase (substring m 0 1)) (substring m 1))
'face 'minibuffer-prompt)))
(apply 'propertize
(concat (upcase (substring m 0 1)) (substring m 1))
minibuffer-prompt-properties)))
(defun isearch-message-suffix (&optional c-q-hack ellipsis)
(concat (if c-q-hack "^Q" "")