Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv31967
Modified Files:
jabber-sasl.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-424
Creator: Magnus Henoch <ma...@fr...>
Copy stored password for SASL authentication
Index: jabber-sasl.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-sasl.el,v
retrieving revision 2.14
retrieving revision 2.15
diff -u -d -r2.14 -r2.15
--- jabber-sasl.el 2 Nov 2007 13:25:07 -0000 2.14
+++ jabber-sasl.el 18 Nov 2007 21:04:50 -0000 2.15
@@ -86,7 +86,7 @@
(lexical-let ((password (plist-get (fsm-get-state-data jc) :password))
(bare-jid (jabber-connection-bare-jid jc)))
(if password
- (lambda (prompt) password)
+ (lambda (prompt) (copy-sequence password))
(lambda (prompt) (jabber-read-password bare-jid)))))
(defun jabber-sasl-process-input (jc xml-data sasl-data)
|
