From: ichikawa <ichikawa>
Date: Mon, 9 Nov 1998 14:46:21 +0000 (+0000)
Subject: lisp/pop3-fma.el: Sync up with T-gnus
X-Git-Tag: gnus-6_8-199811302358~43
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=053a77cf613ef3dc005d482c5c159b5707fb7dea;p=elisp%2Fgnus.git-

lisp/pop3-fma.el: Sync up with T-gnus
---

diff --git a/ChangeLog b/ChangeLog
index e32320b..415b900 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1998-11-09  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>
+
+	* lisp/pop3-fma.el: Set the value of `nnmail-read-passwd' as a
+	symbol `pop3-fma-read-passwd'.
+
 1998-11-04  Yoshiki Hayashi  <g740685@komaba.ecc.u-tokyo.ac.jp>
 
 	* lisp/message.el: (message-do-fcc): Don't run message-header-hook
diff --git a/lisp/pop3-fma.el b/lisp/pop3-fma.el
index 1f09f87..e411f6f 100644
--- a/lisp/pop3-fma.el
+++ b/lisp/pop3-fma.el
@@ -257,7 +257,8 @@ Please do not set this valiable non-nil if you do not use Meadow.")
   (setq passwd (nth 2 (assoc mailhost pop3-fma-password)))
   (pop3-fma-decode-string passwd))
 
-(setq pop3-read-passwd 'pop3-fma-read-passwd)
+(setq pop3-read-passwd 'pop3-fma-read-passwd
+      nnmail-read-passwd 'pop3-fma-read-passwd)
 ;;
 ;; Set multiple pop3 server's password
 (defun pop3-fma-store-password (passwd)