Index: subr.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/subr.el,v
retrieving revision 1.485
diff -c -r1.485 subr.el
*** subr.el	28 Oct 2005 16:55:47 -0000	1.485
--- subr.el	15 Nov 2005 20:27:48 -0000
***************
*** 1541,1546 ****
--- 1541,1547 ----
  	    (c 0)
  	    (echo-keystrokes 0)
  	    (cursor-in-echo-area t))
+ 	(add-text-properties 0 (length prompt) minibuffer-prompt-properties prompt)
  	(while (progn (message "%s%s"
  			       prompt
  			       (make-string (length pass) ?.))