Mercurial > emacs

changeset 76146:77405acb8332

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(map-y-or-n-p): Apply minibuffer-prompt-properties.
author Kim F. Storm <storm@cua.dk>
date Sun, 25 Feb 2007 22:01:08 +0000
parents 56b74c2d1a39
children 541294beb87c
files lisp/emacs-lisp/map-ynp.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/map-ynp.el	Sun Feb 25 22:00:58 2007 +0000
+++ b/lisp/emacs-lisp/map-ynp.el	Sun Feb 25 22:01:08 2007 +0000
@@ -149,7 +149,8 @@
 		     ;; Prompt in the echo area.
 		     (let ((cursor-in-echo-area (not no-cursor-in-echo-area))
 			   (message-log-max nil))
-		       (message "%s(y, n, !, ., q, %sor %s) "
+		       (message (apply 'propertize "%s(y, n, !, ., q, %sor %s) "
+				       minibuffer-prompt-properties)
 				prompt user-keys
 				(key-description (vector help-char)))
 		       (if minibuffer-auto-raise