changeset 24323:c1bb999de64e

(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.
author Richard M. Stallman <rms@gnu.org>
date Tue, 16 Feb 1999 01:05:33 +0000
parents ca77d79a0c21
children 2eec590faf26
files lisp/mail/rmail.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Tue Feb 16 00:52:36 1999 +0000
+++ b/lisp/mail/rmail.el	Tue Feb 16 01:05:33 1999 +0000
@@ -2189,6 +2189,10 @@
 	    (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))