changeset 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 dc6b16a79fd5
children 26145825714f
files lisp/subr.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
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)