From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/39239 Path: main.gmane.org!not-for-mail From: Oliver Scholz Newsgroups: gmane.emacs.gnus.general Subject: auto-fill in body after "^[A-Za-z]: " Date: 12 Oct 2001 15:28:51 +0200 Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1035174977 26828 80.91.224.250 (21 Oct 2002 04:36:17 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 04:36:17 +0000 (UTC) Return-Path: Original-Received: (qmail 7801 invoked from network); 12 Oct 2001 12:31:33 -0000 Original-Received: from malifon.math.uh.edu (mail@129.7.128.13) by mastaler.com with SMTP; 12 Oct 2001 12:31:33 -0000 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 15s1Pp-0005qQ-00; Fri, 12 Oct 2001 07:27:49 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 12 Oct 2001 07:27:26 -0500 (CDT) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id HAA09386 for ; Fri, 12 Oct 2001 07:27:17 -0500 (CDT) Original-Received: (qmail 7749 invoked by alias); 12 Oct 2001 12:27:34 -0000 Original-Received: (qmail 7744 invoked from network); 12 Oct 2001 12:27:33 -0000 Original-Received: from 94-147.f.dial.o-tel-o.net (HELO localhost.localdomain) (212.144.94.147) by gnus.org with SMTP; 12 Oct 2001 12:27:33 -0000 Original-Received: (from egoge@localhost) by localhost.localdomain (8.11.4/8.11.4) id f9CDcoF05405; Fri, 12 Oct 2001 15:38:50 +0200 X-Authentication-Warning: localhost.localdomain: egoge set sender to epameinondas@gmx.de using -f Original-To: ding@gnus.org X-attribution: os Original-Lines: 41 User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.0.106 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:39239 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:39239 Many Greetings to the Gnus Towers! This is the offspring from a discussion on gnu.emacs.gnus about the fact that something like "Suggestion: bla bla ..." breaks auto-fill in message buffer. I have added the following to my .emacs to correct that behaviour while still inhibiting auto-fill in the header. Kai suggested that I should mail my code to this list. (add-hook 'message-mode-hook (lambda () (setq auto-fill-function 'message-do-auto-fill))) (add-hook 'message-setup-hook (lambda () (os-header-set-text-property) (setq auto-fill-inhibit-regexp nil))) (defun os-header-set-text-property () "Put a text-property \"field\" with value \"header\" to the header lines." (save-excursion (put-text-property (point-min) (re-search-forward (concat "^" mail-header-separator) nil nil 1) 'field 'header))) (defun message-do-auto-fill () "Test if point is in message-header before auto-filling." (unless (text-property-any (line-beginning-position) (point) 'field 'header) (do-auto-fill))) 'oliver -- Oliver Scholz Taunusstr. 25 60329 Frankfurt am Main Tel. 069 97 40 99 42