RE: [h-e-w] Gnus, anyone?

[Karel Sprenger]

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))

And then I could read my mail with emacs 21 again (I also commented out the 
two defalias lines in epop3hash.el).  I still got problems with w3 though, 
so I still have to send this reply through Eudora.  I'll post a solution 
that is working for me as soon as I have it ready.

Cheers,
Karel