Re: Meadow2 での x-face 表示？

[Tetsuo Tsuchida <iascii@xxxxxxxxx>]

Fijishima さん、こんばんは。土田です。

>>> Wed, 05 Mar 2003 15:55:08 +0900 (JST) の刻に 「pooh」、すなわち
>>> pooh@xxxxxxxxxxxxxxxxxxxx(Hiroshi Fujishima) 氏曰く

> ys> x-face-e21.el を使うと良いかもしれません。
> 
> linux で、xemacs を使用していたときのものが必要なようですね。

pooh> Emacs 21 専用ですが……。

この後、すぐに自分のポストした内容の誤りに気づいたのですが、ML のレス
ポンスが遅いようで、そのままにしておいて済みませんでした。言われるとお
りです。

> ys> http://homepage3.nifty.com/akima/soft/meadow_28.html#SEC349
> 
> 早速、拝見させていただきましたが gnus 用のもので良いのでしょうか？

pooh> info に

pooh> x-face-e21 (Emacs 21.x の場合)
pooh> ..............................

pooh> Emacs 21.x の場合には、`x-face-mule.el' の代わりに `x-face-e21.el'
pooh> (`ftp://jpl.org/pub/elisp/') を使って X-Face を表示することもできます。
pooh> その場合、bitmap-mule は不要です。以下のように設定してください。

pooh>      (autoload 'x-face-decode-message-header "x-face-e21")
pooh>      (setq wl-highlight-x-face-function 'x-face-decode-message-header)

ありがとうございます。x-face-e21.el の先頭に親切なヘルプがあったのに気
づきまして、次の内容を .wl に追加したら正常に x-face を表示させること
ができました。大変にお騒がせしました。

[Wanderlust] For your .wl file:
-------------------------------
(cond ((featurep 'xemacs)
       ;;
       )
      ((= 21 emacs-major-version)
       (setq wl-highlight-x-face-function 'x-face-decode-message-header)
       (define-key wl-summary-mode-map "\C-x4s" 'x-face-save)
       (define-key wl-draft-mode-map "\C-x4i" 'x-face-insert)
       ;; "\M-t" key is reserved for wl command.
       (define-key wl-draft-mode-map "\M-\C-t" 'x-face-show)
       ;;
       ;; If a file name has no directory component, it should be
       ;; found in the directory which is specified by the
       ;; `x-face-image-file-directory' variable.
       (setq x-face-default-xbm-file "YourFace.xbm")
       ;;
       (add-hook 'wl-mail-setup-hook 'x-face-insert)
       ;; If you use `wl-draft-insert-x-face-field' instead of
       ;; `x-face-insert' for inserting an X-Face, you can highlight
       ;; it as an image with the setting of the following hook:
       (add-hook 'wl-draft-insert-x-face-field-hook
		 (lambda nil
		   (x-face-insert wl-x-face-file)))
       )
      (t
       ;;
       ))

-- 
  ^^  /oooooo
^^ /\/  \   Tetsuo Tsuchida <iascii@xxxxxxxxx>  
  / /    \  http://plaza24.mbn.or.jp/~iascii/