Add Organization header for 'C-x m'.
--- a/.emacs-my Thu Sep 20 20:52:53 2012 +0300
+++ b/.emacs-my Thu Sep 20 21:06:14 2012 +0300
@@ -1272,6 +1272,11 @@
(setq mail-user-agent 'message-user-agent)
+(defun my-compose-mail ()
+ (interactive)
+ (compose-mail nil nil `(("Organization" . ,(getenv "ORGANIZATION")))))
+(global-set-key (kbd "C-x m") #'my-compose-mail)
+
(setq message-citation-line-format "On %Y-%m-%d, %N wrote:
")
(setq message-citation-line-function 'message-insert-formatted-citation-line)