🚀 go-pugleaf

In emacs-18.55, M-X rmail fails when ~/RMAIL is in a buffer not in
rmail-mode.  This may happen f.ex when using saveconf.

Reproduce:
	If an RMAIL buffer exists, quit RMAIL and kill the buffer.
	(find-file "RMAIL")
	(bury-buffer)
	(rmail)
<<Wrong type argument: Integer-or-marker-p, nil>>


Here is a fix.  It also refuses to read new mail while the user is
editing a message, he probably wants to finish editing first.

*** rmail.el~	Wed Aug 23 12:40:33 1989
--- rmail.el	Sun May 20 17:09:06 1990
***************
*** 111,119 ****
  	(progn
  	  (find-file file-name)
! 	  (if (verify-visited-file-modtime existed)
  	      (progn (rmail-forget-messages)
  		     (rmail-set-message-counters))))
        (find-file file-name))
!     (if existed
  	nil
        (rmail-mode)
--- 111,122 ----
  	(progn
  	  (find-file file-name)
! 	  (and (verify-visited-file-modtime existed)
! 	       (eq major-mode 'rmail-mode)
  	      (progn (rmail-forget-messages)
  		     (rmail-set-message-counters))))
        (find-file file-name))
!     (if (eq major-mode 'rmail-edit-mode)
! 	(error "Finish rmail-edit-mode before getting new mail."))
!     (if (and existed (eq major-mode 'rmail-mode))
  	nil
        (rmail-mode)


Hallvard Furuseth
hallvard@ifi.uio.no