lisp/read-passwd.el (read-pw-set-mail-source-passwd-cache):

Use mail-sources instead of nnmail-spool-file.

diff --git a/ChangeLog b/ChangeLog
index 4d12645..b6e4068 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+1999-11-09  Yoshiki Hayashi  <t90553@mail.ecc.u-tokyo.ac.jp>
+
+       * lisp/read-passwd.el (read-pw-set-mail-source-passwd-cache):
+       Use mail-sources instead of nnmail-spool-file.
+       From: Toshiaki -PCX- Tanaka.
+
 1999-11-09  Katsumi Yamaoka <yamaoka@jpl.org>
 
        * lisp/gnus.el (gnus-group-startup-message): Insert space before

diff --git a/lisp/read-passwd.el b/lisp/read-passwd.el
index 6f3c712..d99e37d 100644 (file)
--- a/lisp/read-passwd.el
+++ b/lisp/read-passwd.el
@@ -100,7 +100,7 @@ Argument PROMPT ."
                               (format "%s:%s:%s" server user port)
                               pw))
                  (cdr (assoc from mail-source-password-cache)))))
-           nnmail-spool-file))))
+           mail-sources))))
 ;;
 ;;
 (defvar passwd nil)
@@ -109,4 +109,4 @@ Argument PROMPT ."
                (message "POP Password for %s at %s : " user server)))
   passwd)
 ;;
-;; read-passwd.el ends here.
\ No newline at end of file
+;; read-passwd.el ends here.