From 870560eb10c04f48f7b657664c45894a4820f874 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 24 May 2006 22:28:02 +0000 Subject: [PATCH] (read-passwd): Copy PROMPT before changing its properties. --- lisp/ChangeLog | 4 ++++ lisp/subr.el | 3 +++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cd92a0c5111..11a86401271 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2006-05-24 Richard Stallman + + * subr.el (read-passwd): Copy PROMPT before changing its properties. + 2006-05-25 Mathias Dahl * tumme.el (tumme-display-dired-image): Renamed to diff --git a/lisp/subr.el b/lisp/subr.el index 54361e92eec..67731f4d4c6 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1637,6 +1637,9 @@ by doing (clear-string STRING)." (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) -- 2.39.2