(setq load-path (cons (expand-file-name "/usr/local/share/emacs/apel") load-path))

(setq load-path (cons (expand-file-name "/usr/local/share/emacs/site-lisp/bitmap") load-path))

(autoload 'mew "mew" nil t)
(autoload 'mew-send "mew" nil t)
(setq mew-mail-domain-list '("ca.mbn.or.jp"))

;; [Mew 1.93 (beta) を使用している場合]
(setq mew-use-highlight-x-face t)
(setq mew-use-highlight-x-face-function
      (function
       (lambda (beg end)
        (x-face-mule-x-face-decode-message-header beg end))))
(require 'x-face-mule)

(set-fontset-font
		   "7x14" charset-bitmap
		   "-etl-fixed-medium-r-*--16-*-100-100-m-*-bitmap.8x16-0")