(cw/requiring-package (schizo)
(setq schizo-default-mail-from "tollef@add.no")
(setq schizo-default-news-from "tollef-news@add.no")
-
+ (add-hook 'message-send-hook 'schizo-select)
(setq schizo-select-list '(("t.f.heen@jus.uio.no"
"Tollef Fog Heen"
"University of Oslo, Norway"
(goto-char (point-min))
(replace-regexp gnus-button-url-regexp "<URL:\\&>")))
-(add-hook 'message-send-hook 'schizo-select)
(add-hook 'message-mode-hook '(lambda()(local-set-key "\M-c" 'bbdb-complete-name)))
(add-hook 'message-mode-hook '(lambda()(local-set-key "\M-\S-F" 'tfheen-insert-footnote)))
(add-hook 'message-mode-hook '(lambda()(local-set-key "\"" 'mail-insert-quote)))