[Emacs-diffs] Changes to emacs/lisp/mail/rmail.el

[Dave Love]

Index: emacs/lisp/mail/rmail.el
diff -c emacs/lisp/mail/rmail.el:1.367 emacs/lisp/mail/rmail.el:1.368
*** emacs/lisp/mail/rmail.el:1.367      Sun Jan  5 20:08:31 2003
--- emacs/lisp/mail/rmail.el    Mon Jan  6 11:02:29 2003
***************
*** 281,289 ****
  ;;  files).
  
  (defvar rmail-mmdf-delim1 "^\001\001\001\001\n"
!   "Regexp marking the start of an mmdf message")
  (defvar rmail-mmdf-delim2 "^\001\001\001\001\n"
!   "Regexp marking the end of an mmdf message")
  
  (defcustom rmail-message-filter nil
    "If non-nil, a filter function for new messages in RMAIL.
--- 281,289 ----
  ;;  files).
  
  (defvar rmail-mmdf-delim1 "^\001\001\001\001\n"
!   "Regexp marking the start of an mmdf message.")
  (defvar rmail-mmdf-delim2 "^\001\001\001\001\n"
!   "Regexp marking the end of an mmdf message.")
  
  (defcustom rmail-message-filter nil
    "If non-nil, a filter function for new messages in RMAIL.
***************
*** 2400,2406 ****
                        (progn
                          (check-coding-system coding-system)
                          (setq buffer-file-coding-system coding-system))
!                     (error 
                       (setq buffer-file-coding-system nil))))
                (setq buffer-file-coding-system nil)))))
        ;; Clear the "unseen" attribute when we show a message.
--- 2400,2406 ----
                        (progn
                          (check-coding-system coding-system)
                          (setq buffer-file-coding-system coding-system))
!                     (error
                       (setq buffer-file-coding-system nil))))
                (setq buffer-file-coding-system nil)))))
        ;; Clear the "unseen" attribute when we show a message.