From 3a5c4810ac55b8e7894b347cf800c11a3e9493f2 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Thu, 1 Mar 2007 22:28:14 +0000 Subject: [PATCH] 2007-03-01 Lennart Borgman (isearch-message-prefix): Use minibuffer-prompt-properties. --- lisp/isearch.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 2f17af43c14..612af7e0ecd 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -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" "") -- 2.39.2