From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/35459
Path: main.gmane.org!not-for-mail
From: Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai =?iso-8859-1?q?Gro=DFjohann?=)
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Mail splitting questions or feature requests
Date: 23 Mar 2001 00:55:33 +0100
Message-ID: <vaf1yrpicju.fsf@lucy.cs.uni-dortmund.de>
References: <vetvgp1y5s6.fsf@toespaz.c3.lanl.gov>
	<vafbsqtv4lf.fsf@lucy.cs.uni-dortmund.de>
	<vetae6dpgof.fsf@toespaz.c3.lanl.gov>
	<vafpuf9qu9j.fsf@lucy.cs.uni-dortmund.de>
	<vety9txnzxo.fsf@toespaz.c3.lanl.gov>
	<vafwv9hid79.fsf@lucy.cs.uni-dortmund.de>
	<vetofut9xiq.fsf@toespaz.c3.lanl.gov>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035171200 3209 80.91.224.250 (21 Oct 2002 03:33:20 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 03:33:20 +0000 (UTC)
Cc: ding@gnus.org
Return-Path: <owner-ding@gnus.org>
Original-Received: (qmail 24155 invoked by alias); 22 Mar 2001 23:56:03 -0000
Original-Received: (qmail 24150 invoked from network); 22 Mar 2001 23:56:02 -0000
Original-Received: from waldorf.cs.uni-dortmund.de (129.217.4.42)
  by gnus.org with SMTP; 22 Mar 2001 23:56:02 -0000
Original-Received: from marcy.cs.uni-dortmund.de (marcy.cs.uni-dortmund.de [129.217.20.159]) by waldorf.cs.uni-dortmund.de  with ESMTP id AAA01397; Fri, 23 Mar 2001 00:55:33 +0100 (MET)
Original-Received: from lucy.cs.uni-dortmund.de (lucy [129.217.20.160])
	by marcy.cs.uni-dortmund.de id AAA23086; Fri, 23 Mar 2001 00:55:33 +0100 (MET)
Original-Received: (from grossjoh@localhost)
	by lucy.cs.uni-dortmund.de (8.9.3/8.9.3/Debian 8.9.3-21) id AAA10473;
	Fri, 23 Mar 2001 00:55:33 +0100
X-Face: 6=pZ4hVbjN:C?j1$h/-bi4:F%*~B#Rxb$[0%!{5NK"dE:_QRAM]Dzl=$yMu%Rh4xCSm/#>!
 $n%@SHJ](K<taDos\M;zw#b7gIc01F@'f{.guD~];wV{#\SX0YlGR6fREpYY>FJKL,uF\=G=bRJQC$
 ?+Dlxu*pj.Z,-GK<~y7sd/l*PN\]>}<oCe5vw:p#\Gsv#E(:`3Jl2*()0,/H
Original-To: Reid Rivenburgh <reid@lanl.gov>
In-Reply-To: <vetofut9xiq.fsf@toespaz.c3.lanl.gov> (Reid Rivenburgh's message of "22 Mar 2001 16:47:25 -0700")
User-Agent: Gnus/5.090001 (Oort Gnus v0.01) Emacs/21.0.101
Original-Lines: 27
Xref: main.gmane.org gmane.emacs.gnus.general:35459
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:35459

On 22 Mar 2001, Reid Rivenburgh wrote:

> I see, that's not so difficult.  Do you think there's a way to
> define the known/group list once and use it in a few places rather
> than repeat it?  My list has gotten pretty long.

Yes, it's possible.  You'll have to learn a little about Lisp though.
Lessee...

(setq known-group '( ("known1" "group1") ("known2" "group2") ))
(setq nnmail-split-fancy
      `(& (| ,@(mapcar (lambda (x) (cons "from" x)) known-group))
          ,@(mapcar (lambda (x) (cons "to" x)) known-group)))

Note "`" vs "'".  You might also wish to try

    (cons 'to x)

rather than

    (cons "to" x)

All completely untested.

kai
-- 
Be indiscrete.  Do it continuously.