From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/48374 Path: main.gmane.org!not-for-mail From: Reiner Steib <4uce.02.r.steib@gmx.net> Newsgroups: gmane.emacs.gnus.general Subject: Re: [Patch] MFT in mml-preview Date: Mon, 30 Dec 2002 20:54:56 +0100 Sender: owner-ding@hpc.uh.edu Message-ID: References: Reply-To: reiner.steib@gmx.de NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1041279258 4759 80.91.224.249 (30 Dec 2002 20:14:18 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 30 Dec 2002 20:14:18 +0000 (UTC) Return-path: Original-Received: from util1.math.uh.edu ([129.7.128.22]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18T6Ih-0001ET-00 for ; Mon, 30 Dec 2002 21:14:16 +0100 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by util1.math.uh.edu with esmtp (Exim 4.10) id 18T60K-0005eL-00; Mon, 30 Dec 2002 13:55:16 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 30 Dec 2002 13:56:07 -0600 (CST) Original-Received: from theotp5.physik.uni-ulm.de (theotp5.physik.uni-ulm.de [134.60.10.145]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id NAA13767 for ; Mon, 30 Dec 2002 13:55:54 -0600 (CST) Original-Received: (from ste@localhost) by theotp5.physik.uni-ulm.de (8.11.2/8.11.2) id gBUJsud30419; Mon, 30 Dec 2002 20:54:56 +0100 X-Authentication-Warning: theotp5.physik.uni-ulm.de: ste set sender to 4uce.02.r.steib@gmx.net using -f Original-To: ding@hpc.uh.edu X-Face: .*T0'iU(sujq_j9\J>-d4fg;N/1++U#U$_5ii6k.=|"-n'?5O:Hyz&wi'-!I~,}7~GgT=0S /&-R5sbkNy5+Xo1y{Tw2KKxi@Xh"g@]Qc|.U<*]WDd)qvGowFDvfU1F]{EDho:7P0@|oOD=Bc{K4?> WP68K[Mx:}=`ZT'6g4'f+g?;`vri2!)xGy}3:=l'(/Cea0l4lo^H5#@/Z3ev Mail-Copies-To: nobody Mail-Followup-To: ding@hpc.uh.edu In-Reply-To: (Lars Magne Ingebrigtsen's message of "Mon, 30 Dec 2002 20:14:50 +0100") User-Agent: Gnus/5.090008 (Oort Gnus v0.08) Emacs/21.1 (i386-suse-linux) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:48374 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:48374 On Mon, Dec 30 2002, Lars Magne Ingebrigtsen wrote: > Reiner Steib <4uce.02.r.steib@gmx.net> writes: > >> I added this to `mml.el'. Probably it would be better not to >> duplicate code from `message.el', but I'm not sure how to do this. > > You could try to factor out the common forms into a function or a > macro, I guess... The common part is the condition: (and (or message-subscribed-regexps message-subscribed-addresses message-subscribed-address-file message-subscribed-address-functions) (not (mail-fetch-field "mail-followup-to"))) The four message-subscribed-* could be collected... (defun message-subscribed-FOO-p () (or message-subscribed-regexps message-subscribed-addresses message-subscribed-address-file message-subscribed-address-functions)) ...and we could use "(message-subscribed-FOO-p)" in both, mml.el and message.el. Does this make sense? > Anyway, these changes are so big that it requires FSF paperwork. I have signed the papers. Bye, Reiner. -- ,,, (o o) ---ooO-(_)-Ooo--- PGP key available via WWW http://rsteib.home.pages.de/