Hi,
At 15:32 19-12-01 -0500, Peter Davis wrote:
The seems to work, with a couple of caveats. These are:
1) I kept getting void for ange-ftp-read-passwd. Indeed, this function
doesn't appear to be in ange-ftp.el. So, I just defalias'ed it to
read-passwd. However, this prompts me for the password twice each time I
check mail. I'm sure there's a smarter way to do this, but I don't know
what it is. If anyone has a better idea, I'm open.
I changed the pop3-read-passwd function in ep3m's pop3.el to:
(defun pop3-read-passwd (prompt)
(if (not pop3-read-passwd)
(if (load "passwd" t)
(setq pop3-read-passwd 'read-passwd)
(cond ((= 19 emacs-major-version)
(autoload 'ange-ftp-read-passwd "ange-ftp")
(setq pop3-read-passwd 'ange-ftp-read-passwd))
((<= 20 emacs-major-version)
; read-passwd is defined in subr.el
(message "Setting pop3-read-passwd")
(setq pop3-read-passwd 'read-passwd)))))
(funcall pop3-read-passwd prompt))