From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/8669
Path: main.gmane.org!not-for-mail
From: Steinar Bang <sb@metis.no>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: New feature request: "faked" identity, and supercede
Date: 08 Nov 1996 20:05:59 +0100
Sender: sb@metis.no
Message-ID: <whiv7gbe5k.fsf@norne.metis.no>
References: <whvibt3brz.fsf@norne.metis.no> <m2locgckdx.fsf@proletcult.ifi.uio.no> <whk9rzel3j.fsf@norne.metis.no> <vpu3r3gi47.fsf@dogbert.tivoli.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0 (generated by tm-edit 7.93)
Content-Type: text/plain; charset=US-ASCII
X-Trace: main.gmane.org 1035148801 13589 80.91.224.250 (20 Oct 2002 21:20:01 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 21:20:01 +0000 (UTC)
Return-Path: <ding-request@ifi.uio.no>
Original-Received: (qmail 11011 invoked from smtpd); 8 Nov 1996 19:25:42 -0000
Original-Received: from ifi.uio.no (0@129.240.64.2)
  by deanna.miranova.com with SMTP; 8 Nov 1996 19:25:41 -0000
Original-Received: from gw.metis.no (abel.metis.no [193.90.64.1]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) 
	id <UAA13165@ifi.uio.no> for <ding@ifi.uio.no> ; Fri, 8 Nov 1996 20:06:32 +0100
Original-Received: by gw.metis.no (8.6.12/8.6.12) with ESMTP id UAA15243; Fri, 8 Nov 1996 20:06:00 +0100
Original-Received: by hub.metis.no (8.6.12/8.6.12) with ESMTP id UAA07105; Fri, 8 Nov 1996 20:06:00 +0100
Original-Received: by client.metis.no (8.6.11/8.6.12) id UAA28468; Fri, 8 Nov 1996 20:05:59 +0100
Original-To: ding@ifi.uio.no
In-Reply-To: Sten Drescher's message of 06 Nov 1996 13:04:40 -0600
Original-Lines: 20
X-Mailer: Red Gnus v0.53/Emacs 19.34
Xref: main.gmane.org gmane.emacs.gnus.general:8669
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:8669

>>>>> Sten Drescher <sten.drescher@tivoli.com>:

> 	I use the following, both at home and at work, and I can
> cancel or supercede my posted messages from either location.

> (defadvice message-user-mail-address (before generate-user-mail-address activate compile)
>   "Change the value of the user mail address based on the group."
>   (setq user-mail-address 
> 	(cond
> 	 ((message-news-p) (concat 
> 			    "stend+"
> 			    (gnus-short-group-name gnus-newsgroup-name)
> 			    "@grendel.texas.net"))
> 	 (t "sten.drescher@tivoli.com"))))

Interesting... but what is "defadvice"?  I've never seen it before,
and 
	C-h f defadvice RET
came up with nothing.  Neither did I find anything with index search
in Gnus, Emacs, or Elisp.