emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [rmail-mbox-branch]: inital problems


From: Richard Stallman
Subject: Re: [rmail-mbox-branch]: inital problems
Date: Fri, 17 Sep 2004 19:22:57 -0400

    It would be nice if the new rmail would report an error if it is
    trying to open a old mailbox.  Right now it just assumes that it knows
    what it is doing, and will barf with a babyl formated mailbox.

How about this?

*** rmail.el    22 Feb 2003 19:33:25 -0500      1.368.2.5
--- rmail.el    17 Sep 2004 10:57:33 -0400      
***************
*** 691,698 ****
                   (setq run-mail-hook t)))
        (setq run-mail-hook t)
        (rmail-mode-2)
!       ;; Convert all or part to Babyl file if possible.
! ;;;      (rmail-convert-file)
        (goto-char (point-max)))
      ;; As we have read a file by raw-text, the buffer is set to
      ;; unibyte.  We must make it multibyte if necessary.
--- 691,700 ----
                   (setq run-mail-hook t)))
        (setq run-mail-hook t)
        (rmail-mode-2)
!       (goto-char (point-min))
!       ;; If file starts like a Babyl file, reject it.
!       (if (looking-at "BABYL OPTIONS:")
!         (error "This is a BABYL file; use M-x unrmail to convert it")))
        (goto-char (point-max)))
      ;; As we have read a file by raw-text, the buffer is set to
      ;; unibyte.  We must make it multibyte if necessary.
***************
*** 2533,2539 ****
        ;; Deal with the message headers and URLs..
        (rmail-header-hide-headers)
        (rmail-highlight-headers)
!         (rmail-activate-urls)
  
        ;; ?
        (if transient-mark-mode (deactivate-mark))
--- 2535,2541 ----
        ;; Deal with the message headers and URLs..
        (rmail-header-hide-headers)
        (rmail-highlight-headers)
! ;;;     (rmail-activate-urls)
  
        ;; ?
        (if transient-mark-mode (deactivate-mark))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]