From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/39655 Path: main.gmane.org!not-for-mail From: Josh Huber Newsgroups: gmane.emacs.gnus.general Subject: Re: new Mail-Followup-To patch...please take a look... Date: Tue, 23 Oct 2001 12:54:15 -0400 Organization: Mind your own business, you silly arthur king! Sender: owner-ding@hpc.uh.edu Message-ID: <87g08a9u14.fsf@mclinux.com> References: <87wv1m9y6j.fsf@mclinux.com> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1035175332 29135 80.91.224.250 (21 Oct 2002 04:42:12 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 04:42:12 +0000 (UTC) Return-Path: Original-Received: (qmail 7331 invoked from network); 23 Oct 2001 16:54:46 -0000 Original-Received: from malifon.math.uh.edu (mail@129.7.128.13) by mastaler.com with SMTP; 23 Oct 2001 16:54:46 -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 15w4oQ-00010w-00; Tue, 23 Oct 2001 11:53:58 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Tue, 23 Oct 2001 11:53:35 -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 LAA07634 for ; Tue, 23 Oct 2001 11:53:23 -0500 (CDT) Original-Received: (qmail 7300 invoked by alias); 23 Oct 2001 16:53:39 -0000 Original-Received: (qmail 7295 invoked from network); 23 Oct 2001 16:53:39 -0000 Original-Received: from quimby.gnus.org (HELO quimby2.netfonds.no) (195.204.10.66) by gnus.org with SMTP; 23 Oct 2001 16:53:39 -0000 Original-Received: from news by quimby2.netfonds.no with local (Exim 3.12 #1 (Debian)) id 15w4tz-0006MG-00 for ; Tue, 23 Oct 2001 18:59:43 +0200 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: gnus.ding Original-Lines: 60 Original-NNTP-Posting-Host: lowell.missioncriticallinux.com Original-X-Trace: quimby2.netfonds.no 1003856383 24428 208.51.139.16 (23 Oct 2001 16:59:43 GMT) Original-X-Complaints-To: usenet@quimby2.netfonds.no Original-NNTP-Posting-Date: 23 Oct 2001 16:59:43 GMT X-Go-Away: or I shall taunt you a second time! X-PGP-KeyID: 6B21489A X-PGP-CertKey: 61F0 6138 BE7B FEBF A223 E9D1 BFE1 2065 6B21 489A X-Request-PGP: finger:huber@db.debian.org Mail-Copies-To: nobody User-Agent: Gnus/5.090004 (Oort Gnus v0.04) XEmacs/21.4 (Artificial Intelligence) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:39655 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:39655 prj@po.cwru.edu (Paul Jarc) writes: > Missed a M-x tabify, I guess. Yes, thanks. >> + ;; Generate the Mail-Followup-To header if the header is not there... >> + (if (and (or message-subscribed-regexps >> + message-subscribed-addresses >> + message-subscribed-address-functions) >> + (not (mail-fetch-field "mail-followup-to"))) >> + (message-generate-headers >> + `(("Mail-Followup-To" . ,(message-make-mft)))) >> + ;; otherwise, delete the MFT header if the field is empty >> + (when (equal "" (mail-fetch-field "mail-followup-to")) >> + (message-remove-header "Mail-Followup-To"))) >> ;; Let the user do all of the above. >> (run-hooks 'message-header-hook)) > I had hoped that MFT would be enabled by default: existing > configurations would automatically get MFT when sending to any > to-address or to-list address. (This would mean the 'subscribed > parameter would have to be replaced with a complementary > 'not-subscribed parameter, among other things.) But if that's not > going to be the case, then this chunk might as well be a hook > function. It'll just be one extra line needed in .gnus to enable > MFT. Well, that's what I suggested. I think something like: (setq message-subscribed-addresses (gnus-find-subscrbied-addresses)) in the .gnus file would be an ok thing to have users do, wouldn't it? Or, we could have that as an option in the customize menu as well... > '(lambda ...) does not get byte-compiled. (function (lambda ...)) > does, and otherwise means the same thing. Okay, thanks :) > How about: [snip] > This absorbs (the equivalent of) message-mft-helper into > message-make-mft, doesn't trample match-data, and might evaluate > fewer string-matches on average. (It checks the first address > against each regexp, then the second address, ..., instead of > checking the first regexp against each address, .... I'm guessing > that when there is a match, the first address is likely to match, > and the first regexp is not.) Thanks for checking my elisp. I don't know it that well yet, but you wrote essentially what I had wanted to write, but didn't know exactly how to :) -- Josh Huber