From 9816e3b63588aeea00c2dac6214f7d8876b1b50f Mon Sep 17 00:00:00 2001 From: hayashi Date: Tue, 9 Nov 1999 10:05:56 +0000 Subject: [PATCH] lisp/read-passwd.el (read-pw-set-mail-source-passwd-cache): Use mail-sources instead of nnmail-spool-file. --- ChangeLog | 6 ++++++ lisp/read-passwd.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4d12645..b6e4068 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +1999-11-09 Yoshiki Hayashi + + * 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 * 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 --- 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. -- 1.7.10.4