[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
changing smtp server?
From: |
someusernamehere |
Subject: |
changing smtp server? |
Date: |
Fri, 10 Aug 2007 17:28:29 -0000 |
User-agent: |
G2/1.0 |
Hey I have this on my .gnus file:
;; function that change between smtp servers
(defun fs-change-smtp ()
"Change the SMTP server according to the current from line."
(save-excursion
(let ((from
(save-restriction
(message-narrow-to-headers)
(message-fetch-field "from"))))
(message "From is `%s', setting `smtpmail-smtp-server' to `%s'"
from
(cond
((string-match "foo@bar.org" from)
;; Use stmp-auth
(message "Using smtp-auth")
;; Sending mail
((....................
....................))
;; Use other server
(message "Using other server")
((.......................
.......................))
(t
(error
(concat "Don't know which mail server to use for
"
from))))))))
; (add-hook 'message-setup-hook 'fs-change-smtp)
- changing smtp server?,
someusernamehere <=
- changing smtp server?, someusernamehere, 2007/08/10
- Re: changing smtp server?, Adam Sjøgren, 2007/08/10
- Re: changing smtp server?, someusernamehere, 2007/08/10
- Re: changing smtp server?, Adam Sjøgren, 2007/08/10
- Re: changing smtp server?, someusernamehere, 2007/08/10
- Re: changing smtp server?, Tassilo Horn, 2007/08/10
- Re: changing smtp server?, Adam Sjøgren, 2007/08/10