Re: rmail pop error

[Tim Hesterberg <timh@insightful.com>]

The one-line fix works.
The patch works!
Thanks!

Tim

Glenn Morris wrote:
>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)))