Mercurial > hg > xemacs
comparison mail-from-m.el @ 31:129123962e51
trying to merge lib/emacs and xemacs
| author | Henry S Thompson <ht@inf.ed.ac.uk> |
|---|---|
| date | Sat, 07 Oct 2023 12:43:14 +0100 |
| parents | 6097ab2da4ce |
| children | cb9b76219c55 |
comparison
equal
deleted
inserted
replaced
| 5:8e0e16f4763c | 31:129123962e51 |
|---|---|
| 1 ;;; Edit and load to send mail as from ... | |
| 2 (setq mail-append-host "home.hst.name") | |
| 3 (setq user-full-name "Henry S. Thompson") | |
| 4 (setq user-mail-address "ht@home.hst.name") | |
| 5 (setq mail-host-address "home.hst.name") | |
| 6 (setq mail-signature-file "/home/ht/.sig.pers") | |
| 7 (setq mail-signature t) | |
| 8 (setq message-signature-file "/home/ht/.sig.pers") | |
| 9 (setq message-signature t) | |
| 10 (defun system-name () "home.hst.name") | |
| 11 | |
| 12 ;; sending mail on the road | |
| 13 ;(setq send-mail-function 'smtpmail-send-it) | |
| 14 ;(setq message-send-mail-function 'smtpmail-send-it) | |
| 15 ;(setq smtpmail-default-smtp-server "localhost") | |
| 16 ;(setq smtpmail-smtp-service "smtp") | |
| 17 ;(setq smtpmail-local-domain "home.hst.name") | |
| 18 (setq smtpmail-debug-info t) | |
| 19 (load "smtpmail" nil t) | |
| 20 (setq smtpmail-code-conv-from nil) | |
| 21 | |
| 22 (provide 'mail-from-m) |