From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/8652
Path: main.gmane.org!not-for-mail
From: Steven L Baur <steve@miranova.com>
Newsgroups: gmane.emacs.gnus.general
Subject: (Unwanted) case sensitivity in nnmail-process-unix-mail-format
Date: 07 Nov 1996 11:44:06 -0800
Sender: steve@deanna.miranova.com
Message-ID: <m2ybgdbshl.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 1035148787 13494 80.91.224.250 (20 Oct 2002 21:19:47 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 21:19:47 +0000 (UTC)
Return-Path: <ding-request@ifi.uio.no>
Original-Received: (qmail 25601 invoked from smtpd); 7 Nov 1996 20:20:54 -0000
Original-Received: from riker.diamond-lane.net (root@206.190.83.4)
  by deanna.miranova.com with SMTP; 7 Nov 1996 20:20:54 -0000
Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2]) by riker.diamond-lane.net (8.8.2/8.8.0) with SMTP id MAA05077 for <steve@miranova.com>; Thu, 7 Nov 1996 12:24:48 -0800
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 <UAA27782@ifi.uio.no> for <ding@ifi.uio.no> ; Thu, 7 Nov 1996 20:41:27 +0100
Original-Received: (qmail 24836 invoked by uid 501); 7 Nov 1996 19:44:07 -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: 24
X-Mailer: Red Gnus v0.55/XEmacs 19.15
Xref: main.gmane.org gmane.emacs.gnus.general:8652
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:8652

nnmail-process-unix-mail-format explicitly sets case-fold-search to
nil.  This causes the test for a previous message to lose when it does
not match Message-ID: exactly.  Since all headers are case
insensitive, either the tests:

	(if (re-search-forward "^Message-ID:[ \t]*\\(<[^>]+>\\)" nil t)
	    (setq message-id (match-string 1))
	  (save-excursion
	    (when (re-search-forward "^Message-ID:" nil t)
	      (beginning-of-line)
	      (insert "Original-")))
	  ;; There is no Message-ID here, so we create one.
	  (forward-line 1)
	  (insert "Message-ID: " (setq message-id (nnmail-message-id)) "\n"))

are incorrect, or the binding of case-fold-search to nil is incorrect.

There are a number of mailers that will attach a message id as
Message-Id: so this definitely needs fixing.
-- 
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.