From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.user/2156
Path: news.gmane.org!not-for-mail
From: sigurd@12move.de (Karl =?iso-8859-1?q?Pfl=E4sterer?=)
Newsgroups: gmane.emacs.gnus.user
Subject: Re: Making a shortcut for Reply-To
Date: Sun, 02 Mar 2003 18:15:15 +0100
Organization: Lemis World
Message-ID: <m31y1plmnr.fsf@hamster.pflaesterer.de>
References: <u0lwujhda3z.fsf@durin.imf.au.dk>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: sea.gmane.org 1138668693 14139 80.91.229.2 (31 Jan 2006 00:51:33 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Tue, 31 Jan 2006 00:51:33 +0000 (UTC)
Original-X-From: nobody Tue Jan 17 17:30:16 2006
Original-Path: quimby.gnus.org!newsfeed1.e.nsc.no!nsc.no!nextra.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!uni-berlin.de!p62.246.146.130.tisdip.tiscali.DE!not-for-mail
Original-Newsgroups: gnu.emacs.gnus
Original-NNTP-Posting-Host: p62.246.146.130.tisdip.tiscali.de (62.246.146.130)
Original-X-Trace: fu-berlin.de 1046625384 61392732 62.246.146.130 (16 [72790])
X-Orig-Path: wintendo.pflaesterer.de!not-for-mail
X-Face: #iIcL\6>Qj/G*F@AL9T*v/R$j@7Q`6#FU&Flg6u6aVsLdWf(H$U5>:;&*>oy>jOIWgA%8w*
 A!V7X`\fEGoQ[@D'@i^*p3FCC6&Rg~JT/H_*MOX;"o~flADb8^
User-Agent: Oort Gnus v0.16 Hamster/2.0.0.1
Cancel-Lock: sha1:dAuucLyB946CmWl602a1Kizbe44=
Original-Xref: bridgekeeper.physik.uni-ulm.de gnus-emacs-gnus:2296
Original-Lines: 39
X-Gnus-Article-Number: 2296   Tue Jan 17 17:30:16 2006
Xref: news.gmane.org gmane.emacs.gnus.user:2156
Archived-At: <http://permalink.gmane.org/gmane.emacs.gnus.user/2156>

On 02 Mar 2003, Rasmus Villemoes <- burner+usenet@imf.au.dk wrote:

> In my .gnus I have some mail-splitting methods which depend on the
> content of the line To: (ie. ("Tutor"
> "^To:.*tutor+.*@\\|^Cc:.*tutor+.*@") ). When writing a mail, I often
> use C-c C-f C-r to add a Reply-To -address, and then type in some
> e-mail-alias, such that replies get sorted into the right folder. Now
> I would like some kind of shortcut key (possibly C-c C-f C-R) to an
> interactive command, which prompts for an integer, and then inserts the
> corresponding (predefined) e-mail-adress in the Reply-To field of the
> header. I suppose all this should be defined in my .gnus, but I have
> no idea how to do it. Does anybody have any suggestions?

Here is a possibility, it doesn't ask for an integer but allows you to
scroll through a list of addresses. Maybe you like it. If you prefer a
solution with an integer perhaps you enter the integer and use it as a
key in an alist.


(defun  rv-reply-to ()
  (interactive)
  (message-goto-reply-to)
  (insert
   (let ((addresses
	  (list
	   "adress1"
	   "adress2"
	   "address3")))
     (completing-read "Reply-To?-> " addresses nil nil
		      (car addresses) '(addresses . 1)))))

bye
   KP

-- 
"But it has nothing to do with what a _value_ is.  This has to do with
whether you pass whatever-a-value-is or wherever-whatever-is-a-value-is
whenever you pass an argument to a function.  (Call it the Shakira
theory. :)"       [Erik Naggum in cll über call-by-value und call-by-reference]