diff lisp/subr.el @ 70897:b08d75867f7f

(read-passwd): Copy PROMPT before changing its properties.
author Richard M. Stallman <rms@gnu.org>
date Wed, 24 May 2006 22:27:19 +0000
parents 238e43ed886e
children cc60343f8fd6
line wrap: on
line diff
--- a/lisp/subr.el	Wed May 24 22:27:00 2006 +0000
+++ b/lisp/subr.el	Wed May 24 22:27:19 2006 +0000
@@ -1637,6 +1637,9 @@
 		(sit-for 1))))
 	  success)
       (let ((pass nil)
+	    ;; Copy it so that add-text-properties won't modify
+	    ;; the object that was passed in by the caller.
+	    (prompt (copy-sequence prompt))
 	    (c 0)
 	    (echo-keystrokes 0)
 	    (cursor-in-echo-area t)