X-Face (x-face-mule)

[TOP] -- [Emacsen] -- [X-Face] -- [x-face-mule]

非XEmacs な Emacs/Mule で X-Face を表示する方法の説明です。


必要な package

まず, 基本 tool である compface が必要です。 以下のところから入手して, compile & install してください。

ftp://ftp.jaist.ac.jp/pub/faces/compface/compface.tar.Z
ftp://ftp.win.ne.jp/pub/misc/compface-1.2.tar.gz

Windoze + Meadow な人には, 以下のところから COMPFACE.EXE が 入手できます。

ftp://ftp.mew.org/pub/Mew/Win32/tool/COMPFACE.ZIP

次に, Emacs/Mule で bitmap-image を inline 表示するために, bitmap-mule が必要です。以下のところから入手できます。

ftp://ftp.jpl.org/pub/elisp/bitmap/

bitmap-mule の設定

上記で入手した bitmap-mule package の設定について説明します。 まず package を install してください。この際, 同梱されている BDF font を install することも忘れないでください。

font の install は, UNIX な人なら pdftopcf で PCF に convert したものを font path の通った directory に copy して, mkfontdir すればいいでしょう。 Win32 な人なら, どこかの folder に置いて, font-setup.el に設定を書いて ください (14dot font で使う場合の例)。 この際, bdf-font-dir その他は環境に合わせて読み変えてください。 Meadow の設定 も参考に。

次に, fontset に bitmap を追加してやります。~/.emacs に 以下のように書いてください。16dot font でのみ Emacs/Mule を使っている人は, 特にこの設定は必要ないかもしれません。

Emacs 20.2 以前の場合

(if window-system
    (progn
      (require 'bitmap)
      (mapcar (lambda (fontset)
                (set-fontset-font
                 fontset lc-bitmap
                 "-etl-fixed-medium-r-*--16-*-100-100-m-*-bitmap.8x16-0"))
              (fontset-list))))

Emacs 20.3 以降の場合

(if window-system
    (progn
      (require 'bitmap)
      (mapcar (lambda (fontset)
                (set-fontset-font
                 fontset 'bitmap
                 "-etl-fixed-medium-r-*--16-*-100-100-m-*-bitmap.8x16-0"))
              (fontset-list))))

x-face-mule の設定

郡山さん 作の x-face-mule の設定方法について説明します。 まず package を install してください。

基本的に, Gnus や MH-E などの SEMI-MUA では, (require 'x-face-mule) するだけで使えるようになります。 Wanderlust や Mew では, 以下のような設定が必要です。

Wanderlust

(setq wl-highlight-x-face-func
      'x-face-mule-x-face-decode-message-header)

Mew 1.9x

(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))))

Mew 1.70

(add-hook 'mew-message-hook
          'x-face-mule-x-face-decode-message-header)
(setq x-face-mule-highlight-x-face-position 'x-face)	;; こうしたほうが無難

select-xface と一緒に使う

複数の X-Face から, mail に添付したい X-Face を見ながらにして 選択できるようになる tool, select-xface と共に使う方法です。

特に設定の必要はないと思いますが, x-face-mule-highlight-x-face-position'x-face に設定している場合は select-xface窓 にも X-Face-Img: が 挿入されてしまうので, 注意が必要です。

major-mode によって表示位置を変更できる変数 x-face-mule-highlight-x-face-position-alist が用意されて いますので, これで対処しておきましょう。

(setq x-face-mule-highlight-x-face-position-alist
      '((select-xface-mode . from)
        (fundamental-mode . from)))

郡山さん, 奥西さん, 寺西さん, 山岡さん はじめ, いろんな方のお蔭で随分 楽になりました。 x-face-mule.el には私の名前も見えますが, ほとんど何もしてません (^^; (というか, 私がいじったあたりは 既に淘汰されてもうない...)。

成功すれば こんな感じ (Mew での画面例, 14dot font) になります。


[TOP] -- [Emacsen] -- [X-Face] -- [x-face-mule]
[Tree Map]
邑 tsumura@kuis.kyoto-u.ac.jp