From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.user/67 Path: news.gmane.org!not-for-mail From: =?iso-8859-15?Q?S=E9bastien?= Kirche Newsgroups: gmane.emacs.gnus.user Subject: Re: Lisp recipe to set From header Date: Fri, 27 Jan 2006 23:12:22 +0100 Organization: Aucune. Message-ID: <87u0bpnwvt.fsf@petisuix.seki.fr> References: <878xt1xsle.fsf@knight.monnsta.net> Reply-To: =?iso-8859-15?Q?S=E9bastien?= Kirche NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-15 Content-Transfer-Encoding: 8bit X-Trace: sea.gmane.org 1138487503 22928 80.91.229.2 (28 Jan 2006 22:31:43 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 28 Jan 2006 22:31:43 +0000 (UTC) Original-X-From: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Sat Jan 28 23:31:42 2006 Return-path: Envelope-to: gegu-info-gnus-english@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1F2ybY-0004fw-MU for gegu-info-gnus-english@m.gmane.org; Sat, 28 Jan 2006 23:31:39 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1F2xQT-0001Ua-PY for gegu-info-gnus-english@m.gmane.org; Sat, 28 Jan 2006 16:16:06 -0500 Original-Newsgroups: gnu.emacs.gnus Original-Lines: 23 Original-NNTP-Posting-Host: lns-bzn-47f-81-56-248-57.adsl.proxad.net Original-X-Trace: yeuse.cuq.org 1138399944 60081 81.56.248.57 (27 Jan 2006 22:12:24 GMT) Original-X-Complaints-To: abuse@cuq.org Original-NNTP-Posting-Date: Fri, 27 Jan 2006 22:12:24 +0000 (UTC) X-Face: ; T}O6aj2o*d:|9po%NCuYvExN3]<#cHr0"FaWCh[}WVn6&@L)YWO'&6AO5Ex:MX=H; .^e}o Td*OaFQEBc_xu%+ChwRl!KK`I'["$^aO1gIN{4OyBdO@1HHD5YO#[kiVCk|/-|mmYnU8yTp+eOv."d 1.G3; ro0Q/`,UY+vY/#5b/{OYxE+X\)tc~p~1vbmZ!o4sciW+e8MW|Pz|nl`l*}]8[#1zQO"]d2*{d wrTKu]5t*Gy_pm3e8o=:(c_ju'zlQ<[oJ|\XjgQQmWZC7S]-Fmp\eBHnBO']/te~/; \@l" D#:h)8Q User-Agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (powerpc-unknown-linux-gnu) Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews.google.com!news1.google.com!proxad.net!feed.ac-versailles.fr!news.cuq.org!not-for-mail Original-Xref: shelby.stanford.edu gnu.emacs.gnus:76706 Original-To: info-gnus-english@gnu.org X-BeenThere: info-gnus-english@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Announcements and discussions for GNUS, the GNU Emacs Usenet newsreader \(in English\)" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Errors-To: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.gnus.user:67 Archived-At: At 22:34 on Jan 27 2006, Matthew King said : > I don't know anywhere near enough lisp to write this though, so how > would I go about doing this? If I understand correctly, you should take a look to message-alternative-emails that provides exactly that : when replying to a message where the To: is in the alternatives, that address is automagicaly used for the From: of the reply. Otherwise it uses the styles or the user-mail-address. Its value should be a regexp, so regexp-opt could be useful to build it. Here is an example : (setq message-alternative-emails (regexp-opt (cons user-mail-address '("first@domain.net" "second.value@other.fr" "another@value.net" )))) HTH. -- Sébastien Kirche