Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!husc6!sri-unix!teknowledge-vaxc!dplatt
From: dplatt@teknowledge-vaxc.ARPA (Dave Platt)
Newsgroups: comp.emacs
Subject: Re: overriding header fields in GNU Emacs mail mode
Message-ID: <14874@teknowledge-vaxc.ARPA>
Date: Wed, 22-Jul-87 15:54:43 EDT
Article-I.D.: teknowle.14874
Posted: Wed Jul 22 15:54:43 1987
Date-Received: Sat, 25-Jul-87 01:34:40 EDT
References: <4840@columbia.UUCP>
Distribution: world
Organization: Teknowledge, Inc., Palo Alto CA
Lines: 23
In-reply-to: agw@broadway.columbia.edu's message of 22 Jul 87 18:07:55 GMT


Here's how I add headers to my outgoing GNUmacs mail:

(setq mail-setup-hook 'init-mail)

(defun init-mail ()
  (turn-on-auto-fill)
  (abbrev-mode 0)
  (read-mail-headers))

(defun read-mail-headers ()
  (if (file-exists-p "~/.headers")
      (save-excursion
	(goto-char(point-max))
	(if (re-search-backward "^--text follows")
	    (insert-file-contents (expand-file-name "~/.headers"))))))

It's probably not the best way to do this, but it does work.

The sendmail.cf file on a BSD4.x system can be tweaked to
automatically include a "Reply-to:" header of almost any desirable
format;  unfortunately, you must be the superuser to do this, and the
change will affect all users.  Its biggest win is that it works
for all mail-sending agents, GNUmacs and otherwise.