Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17:/tmp/cvs-serv10375
Modified Files:
jabber-util.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-401
Creator: Magnus Henoch <ma...@fr...>
Use COPY-SEQUENCE when reading password from cache
Index: jabber-util.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-util.el,v
retrieving revision 2.50
retrieving revision 2.51
diff -u -d -r2.50 -r2.51
--- jabber-util.el 29 Aug 2007 01:45:36 -0000 2.50
+++ jabber-util.el 31 Aug 2007 21:45:12 -0000 2.51
@@ -270,7 +270,8 @@
(copy-sequence jabber-password)
(let ((prompt (format "Jabber password for %s: " bare-jid)))
(if (fboundp 'password-read-and-add)
- (password-read-and-add prompt (jabber-password-key bare-jid))
+ (copy-sequence
+ (password-read-and-add prompt (jabber-password-key bare-jid)))
(read-passwd prompt)))))
(defun jabber-uncache-password (bare-jid)
|
