From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/42107
Path: main.gmane.org!not-for-mail
From: Ted Zlatanov <tzz@northernlight.com>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: possible strange idea about hierarchical lists
Date: Wed, 16 Jan 2002 15:12:12 -0500
Organization: =?koi8-r?q?=F4=C5=CF=C4=CF=D2=20=FA=CC=C1=D4=C1=CE=CF=D7?= @
 Cienfuegos
Sender: owner-ding@hpc.uh.edu
Message-ID: <m34rlmm4wz.fsf@onyx.nimbus.northernlight.com>
References: <m3d71ukjkr.fsf@onyx.nimbus.northernlight.com>
	<vaf4rn6gacx.fsf@INBOX.auto.gnus.tok.lucy.cs.uni-dortmund.de>
	<m3r8qayjwh.fsf@onyx.nimbus.northernlight.com>
	<m3bshej2wn.fsf@multivac.cwru.edu>
	<m3bsheubq6.fsf@onyx.nimbus.northernlight.com>
	<vafbshe59mw.fsf@INBOX.auto.gnus.tok.lucy.cs.uni-dortmund.de>
	<m3her3m8al.fsf@onyx.nimbus.northernlight.com>
	<m3bsgivl5m.fsf@quimbies.gnus.org>
	<m3hepmt7jh.fsf@onyx.nimbus.northernlight.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035177396 9650 80.91.224.250 (21 Oct 2002 05:16:36 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 05:16:36 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: (qmail 19127 invoked from network); 16 Jan 2002 20:13:37 -0000
Original-Received: from malifon.math.uh.edu (mail@129.7.128.13)
  by mastaler.com with SMTP; 16 Jan 2002 20:13:37 -0000
Original-Received: from sina.hpc.uh.edu ([129.7.128.10])
	by malifon.math.uh.edu with esmtp (Exim 3.20 #1)
	id 16QwQu-0002ta-00; Wed, 16 Jan 2002 14:13:16 -0600
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 16 Jan 2002 14:13:10 -0600 (CST)
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 OAA01223
	for <ding@hpc.uh.edu>; Wed, 16 Jan 2002 14:12:54 -0600 (CST)
Original-Received: (qmail 19085 invoked by alias); 16 Jan 2002 20:12:42 -0000
Original-Received: (qmail 19080 invoked from network); 16 Jan 2002 20:12:42 -0000
Original-Received: from tantalum.northernlight.com (HELO bronze.nimbus.northernlight.com) (205.181.75.60)
  by gnus.org with SMTP; 16 Jan 2002 20:12:42 -0000
Original-Received: from onyx.nimbus.northernlight.com (onyx.nimbus.northernlight.com [10.0.3.57])
	by bronze.nimbus.northernlight.com (8.10.0/8.10.0) with ESMTP id g0GKCG721044
	for <ding@gnus.org>; Wed, 16 Jan 2002 15:12:16 -0500 (EST)
Original-To: ding@gnus.org
X-Face: bd.DQ~'29fIs`T_%O%C\g%6jW)yi[zuz6;d4V0`@y-~$#3P_Ng{@m+e4o<4P'#(_GJQ%TT= D}[Ep*b!\e,fBZ'j_+#"Ps?s2!4H2-Y"sx"
Mail-Followup-To: ding@gnus.org
In-Reply-To: <m3hepmt7jh.fsf@onyx.nimbus.northernlight.com> (Ted Zlatanov's
 message of "Wed, 16 Jan 2002 14:33:38 -0500")
Original-Lines: 18
User-Agent: Gnus/5.090005 (Oort Gnus v0.05) Emacs/21.1
 (i386-redhat-linux-gnu)
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:42107
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:42107

Ted Zlatanov <tzz@northernlight.com> writes:

> (let* ((recipients '(("foo@bar" . "Name <foo@bar>") ("baz@quux" . "None <baz@quux>")))
>        (s recipients)
>        (gnus-hierarchical-lists '( ("foo@bar" . "baz@quux"))))
>   (while gnus-hierarchical-lists
>     (let* ((node (pop gnus-hierarchical-lists))
> 	   (parent (car node))
> 	   (child (cdr node)))
>       (when (and (assoc parent recipients) (assoc child recipients))
> 	  (delq parent recipients)))))

I should clarify - in message.el the recipients variable is already
set for you, I just set it manually so I could test the code in
isolation from the rest of Gnus.

Thanks
Ted