--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mail-from.el	Sun May 06 14:22:37 2007 +0100
@@ -0,0 +1,19 @@
+;;; Edit and load to send mail as from ...
+(setq mail-append-host "hst.name")
+(setq user-full-name "Henry S. Thompson")
+(setq user-mail-address "hst@hst.name")
+(setq mail-host-address "hst.name")
+(setq mail-signature-file "~/.sig.pers")
+(defun system-name () "francis.hst.name")
+
+;; sending mail on the road
+(setq send-mail-function 'smtpmail-send-it)
+(setq message-send-mail-function 'smtpmail-send-it)
+(setq smtpmail-default-smtp-server "localhost")
+(setq smtpmail-smtp-service "smtp")
+(setq smtpmail-local-domain "hst.name")
+(setq smtpmail-debug-info t)
+(load "smtpmail" nil t)
+(setq smtpmail-code-conv-from nil)
+
+;; tunnel: ssh -L 25:p15135390.pureserver.info:25 markup.co.uk