If you use MH and BBDB, and you would like to use BBDB's built-in
support for mail aliases, here's a little code that'll help you along.
As described in the BBDB manual, you'll need to add mail-alias
fields to your BBDB records. Then put the code below into your .emacs,
and you should be set.
The reason for using this method for handling mail aliases as opposed to
MH's built-in system is pretty familiar: with this method, you always
see exactly what address a message will be sent to. Don't forget to edit
your .mh_profile and turn off aliases.
Fritz
(setq mh-folder-mode-hook 'bbdb-insinuate-mh)
(eval-after-load "mailabbrev"
'(progn
(require 'bbdb)
;; Define the aliases
(bbdb-define-all-aliases)))
(setq mh-letter-mode-hook
(function (lambda ()
;; Turn on mail abbrevs for this letter
(mail-abbrevs-setup)
;; Expand any aliases in the header
(mapcar (function (lambda (field)
(save-excursion
(if (mh-position-on-field field nil)
(expand-abbrev)))))
'("To:" "Cc:"))
;; Fix up the buffer
(set-buffer-modified-p nil))))
