From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/8648
Path: main.gmane.org!not-for-mail
From: Steven L Baur <steve@miranova.com>
Newsgroups: gmane.emacs.gnus.general
Subject: Previous patch to nnmail.el was bogus
Date: 07 Nov 1996 11:12:17 -0800
Sender: steve@deanna.miranova.com
Message-ID: <m220e5d8j2.fsf@deanna.miranova.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0 (generated by tm-edit 7.93)
Content-Type: text/plain; charset=US-ASCII
X-Trace: main.gmane.org 1035148784 13466 80.91.224.250 (20 Oct 2002 21:19:44 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 21:19:44 +0000 (UTC)
Return-Path: <ding-request@ifi.uio.no>
Original-Received: (qmail 24911 invoked from smtpd); 7 Nov 1996 19:49:13 -0000
Original-Received: from ifi.uio.no (0@129.240.64.2)
  by deanna.miranova.com with SMTP; 7 Nov 1996 19:49:12 -0000
Original-Received: from deanna.miranova.com (qmailr@deanna.miranova.com [206.190.83.1]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) 
	id <UAA25362@ifi.uio.no> for <ding@ifi.uio.no> ; Thu, 7 Nov 1996 20:09:37 +0100
Original-Received: (qmail 24553 invoked by uid 501); 7 Nov 1996 19:12:18 -0000
Original-To: ding@ifi.uio.no
X-Url: http://www.miranova.com/%7Esteve/
Mail-Copies-To: never
X-Face: #!T9!#9s-3o8)*uHlX{Ug[xW7E7Wr!*L46-OxqMu\xz23v|R9q}lH?cRS{rCNe^'[`^sr5"
 f8*@r4ipO6Jl!:Ccq<xoV[Qz2u8<8-+Vwf2gzJ44lf_/y9OaQ`@#Q65{U4/TC)i2`~/M&QI$X>p:9I
 OSS'2{-)-4wBnVeg0S\O4Al@)uC[pD|+
Original-Lines: 41
X-Mailer: Red Gnus v0.55/XEmacs 19.15
Xref: main.gmane.org gmane.emacs.gnus.general:8648
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:8648

Here is a better version.

===================================================================
RCS file: RCS/nnmail.el,v
retrieving revision 1.25
diff -u -r1.25 nnmail.el
--- nnmail.el	1996/11/07 04:02:49	1.25
+++ nnmail.el	1996/11/07 18:28:32
@@ -641,15 +641,17 @@
     (while (not found)
       (if (not (re-search-forward "^From " nil t))
 	  (setq found 'no)
-	(beginning-of-line)
-	(when (and (or (bobp)
-		       (save-excursion
-			 (forward-line -1)
-			 (= (following-char) ?\n)))
-		   (save-excursion
-		     (forward-line 1)
-		     (looking-at "[^ \t:]+[ \t]*:")))
-	  (setq found 'yes))))
+	(save-excursion
+	  (beginning-of-line)
+	  (when (and (or (bobp)
+			 (save-excursion
+			   (forward-line -1)
+			   (= (following-char) ?\n)))
+		     (save-excursion
+		       (forward-line 1)
+		       (looking-at "[^ \t:]+[ \t]*:")))
+	    (setq found 'yes)))))
+    (beginning-of-line)
     (eq found 'yes)))
 
 (defun nnmail-process-unix-mail-format (func artnum-func)

-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.
What are the last two letters of "doesn't" and "can't"?
Coincidence?  I think not.