[Emacs-diffs] emacs/lisp/mail sendmail.el

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Richard M. Stallman <rms>       09/01/05 15:53:06

Modified files:
        lisp/mail      : sendmail.el 

Log message:
        (mail-bury): Treat pmail-mode like rmail-mode.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/sendmail.el?cvsroot=emacs&r1=1.318&r2=1.319

Patches:
Index: sendmail.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mail/sendmail.el,v
retrieving revision 1.318
retrieving revision 1.319
diff -u -b -r1.318 -r1.319
--- sendmail.el 5 Jan 2009 03:22:37 -0000       1.318
+++ sendmail.el 5 Jan 2009 15:53:05 -0000       1.319
@@ -791,7 +791,7 @@
             (not (one-window-p))
             (with-current-buffer
                  (window-buffer (next-window (selected-window) 'not))
-              (setq rmail-flag (eq major-mode 'rmail-mode))
+              (setq rmail-flag (memq major-mode '(rmail-mode pmail-mode)))
               (setq summary-buffer
                     (and mail-bury-selects-summary
                          (boundp 'rmail-summary-buffer)