[mew-dist 21859] Re: X-face inline display

[弓岡 也守輝 (YUMIOKA Yasuteru)]

お世話になります、弓岡です。

参考になるかどうか分かりませんが、

Meadow ("Meadow-1.15pre2 (SHOUBU:63)") でも、
NTEmacs ("GNU Emacs 21.2.1 (i386-mingw-windows98.1998))でも

ftp://ftp.jpl.org/pub/elisp/bitmap/bitmap-mule-8.5.tar.gz
ftp://ftp.jpl.org/pub/elisp/ x-face-1.3.6.20.tar.gz

を使って、無事 x-face が表示/挿入できています。

~/.mew.el は 下記の様にしてます。

(setq mew-use-highlight-x-face t)
(setq mew-use-highlight-x-face-function
        (function
         (lambda (beg end)
         (x-face-decode-message-header beg end))))
(require 'x-face-mule)

(autoload 'x-face-encode "x-face"
"Generate X-Face string(s) from xbm file." t)
(autoload 'x-face-insert "x-face"
"Insert X-Face fields." t)
(autoload 'x-face-save "x-face"
"Save X-Face fields to files." t)
(autoload 'x-face-view "x-face"
"View X-Face fields." t)
(autoload 'x-face-ascii-view "x-face"
"View X-Face fields as ascii pictures." t)

; イメージファイルを置くディレクトリ
(setq x-face-image-file-directory "~/x-faces")

; イメージファイルをセーブするためのディレクトリ
(setq x-face-image-file-directory-for-save "~/x-faces")

(setq x-face-default-xbm-file "myface.xbm")

;; Mew の hook
(add-hook 'mew-draft-mode-hook
	  (function (lambda ()
		      (define-key mew-draft-mode-map "\C-c\C-f" 'x-face-insert))))

--
弓岡＠NTEmacs 使うの、とっても久しぶり。