Re: rmail pop error

[Glenn Morris <rgm@gnu.org>]

Tim Hesterberg wrote:

> (rmail-autodetect)
> returns nil in both 22.1.90 and 22.1.1  (after M-x rmail)
[...]
> This does exist, and is executable
> d:/emacs/emacs-22.1.90/bin/movemail.exe

Thanks; I think I see what's going on now. Does it work in 22.1.90 if
you add:

(setq rmail-movemail-program "d:/emacs/emacs-22.1.90/bin/movemail.exe")

to your setup?

Without doing that, does this patch fix it? (Apply to rmail.el in
22.1.90, recompile the file, restart Emacs.)


*** rmail.el	31 Jan 2008 10:39:19 -0000	1.433.2.9
--- rmail.el	20 Feb 2008 02:11:19 -0000
***************
*** 214,220 ****
        (dolist (dir (append rmail-movemail-search-path exec-path
  			   (list exec-directory)))
  	(when (and dir (file-accessible-directory-p dir))
! 	  (let ((progname (expand-file-name "movemail" dir)))
  	    (when (and (not (file-directory-p progname))
  		       (file-executable-p progname))
  	      (let ((x (rmail-probe progname)))
--- 214,227 ----
        (dolist (dir (append rmail-movemail-search-path exec-path
  			   (list exec-directory)))
  	(when (and dir (file-accessible-directory-p dir))
! 	  ;; Previously this used to work on Windows by luck (?),
! 	  ;; because rmail-insert-inbox-text fell back to
! 	  ;; (expand-file-name "movemail" exec-directory).
! 	  ;; http://lists.gnu.org/archive/html/bug-gnu-emacs/2008-02/msg00087.html
! 	  (let ((progname (expand-file-name
! 			   (concat "movemail"
! 				   (if (memq system-type '(ms-dos windows-nt))
! 				       ".exe")) dir)))
  	    (when (and (not (file-directory-p progname))
  		       (file-executable-p progname))
  	      (let ((x (rmail-probe progname)))