--- ../../pgnus-sent/lisp/nnmail.el	Fri Aug 27 16:33:42 1999
+++ nnmail.el	Thu Sep  9 01:58:59 1999
@@ -814,8 +814,8 @@
        ;; if there is no head-body delimiter, we search a bit manually.
        (while (and (looking-at "From \\|[^ \t]+:")
 		   (not (eobp)))
-	 (forward-line 1)
-	 (point))))
+	 (forward-line 1))
+       (point)))
     ;; Find the Message-ID header.
     (goto-char (point-min))
     (if (re-search-forward "^Message-ID:[ \t]*\\(<[^>]+>\\)" nil t)