[mew-dist 22942] Re: X Face

[TAKANO Yuji ( たかのゆ〜じ )]

たかのです。こんにちは。

  [mew-dist 22891] X Face にスレッドとした方が良かったのか解りま
せんが、とりあえず新スレッドにします。

  Mew version 3.1.51 にしたら XEmacs 21.4 ではサマリモードで
x-face が From: の所に表示できなくなってしまいました。新規のメー
ルを送信する時に添付する事はできています。


  最初 XEmacs 21.4.9 を使っていたのですが、21.4.12 にあげて、
x-face は x-face-1.3.6.10 から x-face-1.3.6.20 にあげてみました。

  x-face-1.3.6.20 にしたら M-x x-face-view とたたくと xv が起動
する様になり、インライン展開しなくなりました。mew-3.1.50 の頃は
以下の設定で無事に動いていました。どこかに変な設定があるか教えて
いただけませんでしょうか。


たかの
---
 Mail and Web : takachan at example.com    : http://www.running-dog.net/
              : takachan at example.com
              : takachan at example.com         : http://www.icmpv6.org/





;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;  X-face の設定
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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

; XEmacs の時の処理
(cond ((featurep 'xemacs)
    (autoload 'x-face-xmas-display-x-face "x-face"
      "Display X-Face fields as XEmacs-glyph." t)
    (autoload 'x-face-xmas-force-display-x-face "x-face"
      "Display X-Face fields compulsorily as XEmacs glyph.")
    (autoload 'x-face-xmas-remove-x-face-glyph "x-face"
      "Remove X-Face images and some text-properties.")

; M-x x-face-insert で x-face を付ける設定
    (setq x-face-xmas-inhibit-read-only t)

; mew で x-face を付けるか聞いて来るようにする設定
    (add-hook 'mew-draft-mode-hook
	(function
	(lambda ()
  		(when (y-or-n-p "X-Face ヘッダを付けますか? ")
		      (x-face-insert)
		      (x-face-xmas-force-display-x-face)
	))))
)

; Emacs の時の処理
(t
	:
))