From: Richard M. Stallman Date: Tue, 16 Feb 1999 01:05:33 +0000 (+0000) Subject: (rmail-show-message): If an unseen message has a X-Git-Tag: emacs-20.4~626 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2751e20bad749fe01d7c885f5fdd51193599530c;p=emacs.git (rmail-show-message): If an unseen message has a Summary-line in its header, get past one more line before looking for the X-Coding-System header. --- diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 8cb138b6f2d..1ca210efd89 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -2189,6 +2189,10 @@ If summary buffer is currently displayed, update current message there also." (save-restriction (if (prog1 (= (following-char) ?0) (forward-line 2) + ;; If there's a Summary-line in the (otherwise empty) + ;; header, we didn't yet get past the EOOH line. + (if (looking-at "^\\*\\*\\* EOOH \\*\\*\\*\n") + (forward-line 1)) (narrow-to-region (point) end)) (rfc822-goto-eoh) (search-forward "\n*** EOOH ***\n" end t))