[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: When replying, set From: to use the address where I received the ema
From: |
Peter Münster |
Subject: |
Re: When replying, set From: to use the address where I received the email |
Date: |
Fri, 28 Aug 2015 08:22:08 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.0.50 (gnu/linux) |
On Thu, Aug 27 2015, Bastien wrote:
> Thanks -- I was already using this, but it does not work when replying
> to mailing lists since ‘message-use-alternative-email-as-from’ is only
> using the "To" "Cc" "From" headers (this is hardcoded).
You can use gnus-parameters for lists. Here some lines of my setup,
perhaps it can help:
--8<---------------cut here---------------start------------->8---
(setq
pm/lists '((:name "context.list"
:list-identifier "\\[NTG-context\\]"
:address "ntg-context@ntg.nl")
....)
pm/list-address "pmlists@free.fr"
gnus-parameters
`(("^[^.]*$" (gcc-self . t) (display . [not expire]))
,@(cl-loop for item in pm/lists collect
`(,(pm/str->regexp (plist-get item :name))
(subscribed . t) (gcc-self . none) (display . default)
(to-list . ,(plist-get item :address))
(pm/role "list") (pm/language "en")
(posting-style (address ,pm/list-address)
(eval (setq pm/role "list"
pm/language "en"))
(To ,(plist-get item :address)))
(gnus-list-identifiers ,(plist-get item :list-identifier))))
("nntp+.*" (pm/role "list") (pm/language "en")
(posting-style (address ,pm/list-address)
(eval (setq pm/role "list" pm/language "en"))))))
--8<---------------cut here---------------end--------------->8---
--
Peter