From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Miles Bader Newsgroups: gmane.emacs.devel Subject: Re: flyspell.el patch Date: Thu, 16 Oct 2003 13:12:09 -0400 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: <20031016171209.GA24087@fencepost> References: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1066324795 24286 80.91.224.253 (16 Oct 2003 17:19:55 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 16 Oct 2003 17:19:55 +0000 (UTC) Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Thu Oct 16 19:19:53 2003 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AABmz-0000kn-00 for ; Thu, 16 Oct 2003 19:19:53 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1AABmz-0006cL-00 for ; Thu, 16 Oct 2003 19:19:53 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.24) id 1AABkq-00084f-50 for emacs-devel@quimby.gnus.org; Thu, 16 Oct 2003 13:17:40 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.24) id 1AABkE-0007uu-IS for emacs-devel@gnu.org; Thu, 16 Oct 2003 13:17:02 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.24) id 1AABji-0007m9-OK for emacs-devel@gnu.org; Thu, 16 Oct 2003 13:17:01 -0400 Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.24) id 1AABj6-0007fh-Pr for emacs-devel@gnu.org; Thu, 16 Oct 2003 13:15:52 -0400 Original-Received: from miles by fencepost.gnu.org with local (Exim 4.24) id 1AABfV-0006Tq-M3; Thu, 16 Oct 2003 13:12:09 -0400 Original-To: emacs-devel@gnu.org Content-Disposition: inline In-Reply-To: User-Agent: Mutt/1.3.28i Blat: Foop X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.2 Precedence: list List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:17165 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:17165 On Thu, Oct 16, 2003 at 06:09:42PM +0200, Lars Magne Ingebrigtsen wrote: > The following patch fixes the in-headers predicated -- if > mail-header-separator is "", it was true on most bodies as well. > Reversing the logic (kinda) should do the trick... > > (let ((in-headers (save-excursion > ! (not (re-search-backward mail-header-separator nil t)))) It still seems wrong -- according to the documentation, mail-header-separator is _not_ a regexp, so the above code is going to simply always return true for a typical value like "" (which I use). I guess it needs to be something like (note no `re-'): (not (search-backward (concat "\n" mail-header-separator "\n") nil t)) -Miles -- P.S. All information contained in the above letter is false, for reasons of military security.