# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 973725540 0
# Node ID 0ca2ddcb4da5d728418c8f2ea223aebc03a9187b
# Parent  c7b4f314fff8c81d70dcbc3fb5e14c63b3bd91bf
2000-09-29 09:56:34  ShengHuo ZHU  <zsh@cs.rochester.edu>

	* nndoc.el (nndoc-dissect-mime-parts-sub): Correctly mark body-begin.

diff -r c7b4f314fff8 -r 0ca2ddcb4da5 lisp/gnus/nndoc.el
--- a/lisp/gnus/nndoc.el	Wed Nov 08 21:18:50 2000 +0000
+++ b/lisp/gnus/nndoc.el	Wed Nov 08 23:19:00 2000 +0000
@@ -701,7 +701,8 @@
 	subject content-type type subtype boundary-regexp)
     ;; Gracefully handle a missing body.
     (goto-char head-begin)
-    (if (search-forward "\n\n" body-end t)
+    (if (or (and (eq (char-after) ?\n) (or (forward-char 1) t))
+	    (search-forward "\n\n" body-end t))
 	(setq head-end (1- (point))
 	      body-begin (point))
       (setq head-end body-end