# HG changeset patch
# User Simon Josefsson <jas@extundo.com>
# Date 1133873699 0
# Node ID 66e6a179905b8d3e1a0a53ca62ba1065d29628ff
# Parent  bdeb6c3bfc1bdf073378516fd208aff411204e71
* mail/smtpmail.el (smtpmail-try-auth-methods): Make password
prompts work for AUTH PLAIN.

diff -r bdeb6c3bfc1b -r 66e6a179905b lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Dec 06 12:43:47 2005 +0000
+++ b/lisp/ChangeLog	Tue Dec 06 12:54:59 2005 +0000
@@ -1,3 +1,8 @@
+2005-12-06  Nozomu Ando <nand@mac.com>  (tiny patch)
+
+	* mail/smtpmail.el (smtpmail-try-auth-methods): Make password
+	prompts work for AUTH PLAIN.
+
 2005-12-06  L$,1 q(Brentey K,Aa(Broly  <lorentey@elte.hu>
 
 	* frame.el (set-frame-parameter): Add doc string.
diff -r bdeb6c3bfc1b -r 66e6a179905b lisp/mail/smtpmail.el
--- a/lisp/mail/smtpmail.el	Tue Dec 06 12:43:47 2005 +0000
+++ b/lisp/mail/smtpmail.el	Tue Dec 06 12:54:59 2005 +0000
@@ -569,7 +569,7 @@
 					(concat "\0"
 						(smtpmail-cred-user cred)
 						"\0"
-						(smtpmail-cred-passwd cred))))
+						passwd)))
 	(if (or (null (car (setq ret (smtpmail-read-response process))))
 		(not (integerp (car ret)))
 		(not (equal (car ret) 235)))