Re: splitting outgoing mail depending on To: field

Re: splitting outgoing mail depending on To: field

[Alexander Syrov]

Hello, oli.

On Tue, 14 Sep 2004 06:52:11 +0200
oli wrote:

 o> I would like to split my outgoing mails depending on the To: field ...
...
 o> The splitting on outgoing mail I have seen in the doc, is done before
 o> the mail is written ... but what I would like is to do it after ...

Gnus doesn't seem to have a built-in functionality for this. But it can
be done with a hook. Currently I have a following piece of code in my
~/.gnus (simplified):

,----[ ~/.gnus ]
| (setq
|  gnus-message-archive-group nil
|  gnus-gcc-mark-as-read t)
| (add-hook
|  'message-send-hook
|  '(lambda ()
|     (save-excursion
|       (let ((to   (save-restriction
| 		    (message-narrow-to-headers)
| 		    (message-fetch-field "To")))))
| 	(cond
| 	 ((message-news-p)
| 	  (message-add-header "Gcc: nnml:sent.news")) ;; posted news articles
|  	 ((string-match "user1@domain1" to)
|  	  (message-add-header "Gcc: nnml:User1"))
|  	 ((string-match "user2@domain2" to)
|  	  (message-add-header "Gcc: nnml:User2"))
| 	 (t
| 	  (message-add-header "Gcc: nnml:sent.misc")))))) ;; default for mail
`----

-- 
Regards,
Alexander Syrov.