From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/34762
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: adding to-address for lots (hundreds) of groups ?
Date: 13 Feb 2001 13:33:44 +0100
Sender: owner-ding@hpc.uh.edu
Message-ID: <vafu25yoj87.fsf@lucy.cs.uni-dortmund.de>
References: <m37l2vxfam.fsf@austin.jhcloos.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035170625 31976 80.91.224.250 (21 Oct 2002 03:23:45 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 03:23:45 +0000 (UTC)
Cc: ding@gnus.org
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from karazm.math.uh.edu (karazm.math.uh.edu [129.7.128.1])
	by mailhost.sclp.com (Postfix) with ESMTP id 08281D049D
	for <jason@mastaler.com>; Tue, 13 Feb 2001 07:34:28 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by karazm.math.uh.edu (8.9.3/8.9.3) with ESMTP id GAC26664;
	Tue, 13 Feb 2001 06:34:21 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Tue, 13 Feb 2001 06:33:34 -0600 (CST)
Original-Received: from mailhost.sclp.com (postfix@66-209.196.61.interliant.com [209.196.61.66] (may be forged))
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id GAA26917
	for <ding@hpc.uh.edu>; Tue, 13 Feb 2001 06:33:24 -0600 (CST)
Original-Received: from waldorf.cs.uni-dortmund.de (waldorf.cs.uni-dortmund.de [129.217.4.42])
	by mailhost.sclp.com (Postfix) with ESMTP id 4D32ED049D
	for <ding@gnus.org>; Tue, 13 Feb 2001 07:33:54 -0500 (EST)
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 NAA07408; Tue, 13 Feb 2001 13:33:49 +0100 (MET)
Original-Received: from lucy.cs.uni-dortmund.de (lucy [129.217.20.160])
	by marcy.cs.uni-dortmund.de id NAA12567; Tue, 13 Feb 2001 13:33:49 +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 NAA09187;
	Tue, 13 Feb 2001 13:33:49 +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: "James H. Cloos Jr." <cloos@jhcloos.com>
In-Reply-To: <m37l2vxfam.fsf@austin.jhcloos.com> ("James H. Cloos Jr."'s message of "13 Feb 2001 00:33:53 -0600")
User-Agent: Gnus/5.090001 (Oort Gnus v0.01) Emacs/21.0.98
Precedence: list
X-Majordomo: 1.94.jlt7
Original-Lines: 19
Xref: main.gmane.org gmane.emacs.gnus.general:34762
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:34762

On 13 Feb 2001, James H. Cloos, Jr. wrote:

> What I need now is a function that will set to to-address param
> based on the group's name.

(defun jhc-set-to-address ()
  (when (and gnus-newsgroup-name
             (stringp gnus-newsgroup-name)
             (string-match "nnml:\\([a-z]+\\)@" gnus-newsgroup-name))
    (gnus-group-set-parameter gnus-newsgroup-name
                              'to-address
                              (match-string 1 gnus-newsgroup-name))))
(add-hook 'gnus-summary-mode-hook 'jhc-set-to-address)

Untested!  Does this do something useful?

kai
-- 
Be indiscrete.  Do it continuously.