# HG changeset patch
# User ht
# Date 1606753618 0
# Node ID 6097ab2da4ceb56465641a739c90e06007b2bda7
# Parent  7b2c4ed3630261a80a486057ebabe2c3a9440fc4
for new maritain

diff -r 7b2c4ed36302 -r 6097ab2da4ce mail-from-m.el
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mail-from-m.el	Mon Nov 30 16:26:58 2020 +0000
@@ -0,0 +1,22 @@
+;;; Edit and load to send mail as from ...
+(setq mail-append-host "home.hst.name")
+(setq user-full-name "Henry S. Thompson")
+(setq user-mail-address "ht@home.hst.name")
+(setq mail-host-address "home.hst.name")
+(setq mail-signature-file "/home/ht/.sig.pers")
+(setq mail-signature t)
+(setq message-signature-file "/home/ht/.sig.pers")
+(setq message-signature t)
+(defun system-name () "home.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 "home.hst.name")
+(setq smtpmail-debug-info t)
+(load "smtpmail" nil t)
+(setq smtpmail-code-conv-from nil)
+
+(provide 'mail-from-m)