06/11/13 21:48:10
>>636
$HOME/.wl では、
(autoload 'mu-cite-original "mu-cite" nil t)
(add-hook 'mail-citation-hook (function mu-cite-original))
(setq message-cite-function (function mu-cite-original))
(add-hook 'mu-cite-load-hook
(function
(lambda ()
(require 'mu-bbdb)
)))
(setq mu-cite-prefix-format '("> "))
(setq mu-cite-cited-prefix-regexp "\\(^[^ \t\n<>]+>+[ \t]*\\)")
(setq mu-cite-top-format
:(以下続く)
の様に設定しています。