[Mew-dist 08457] Re: X-Face problem on mew-1.94b17
Hajimu UMEMOTO ( 梅本 肇 )
ume at example.com
1999年 4月 3日 (土) 04:15:23 JST
梅本@IMASYです。
>>> Fri, 2 Apr 1999 16:16:03 +0900 の刻に「shirai」、すなわち
>>> Hideyuki SHIRAI (白井秀行) <shirai at example.com> 氏曰く
shirai> # 私も x-face-mule だめです。;_;
同じく。;_;
kazu> Emacs 20.3 で確かめてもらえますか? 再現するようなら真剣に取り組みます。
shirai> 20.3 は大昔に消しちゃったので、昔ながらの以下の方法でしのいでい
shirai> ます。御参考までに > 向内 さん
私は 20.3 です。
shirai> (defun mew-x-face-mule-view ()
shirai> (if (not mew-use-highlight-x-face)
shirai> ()
shirai> (goto-char (point-min))
shirai> (if (and (re-search-forward "\n\n" nil t)
shirai> (re-search-backward "^X-Face:" nil t))
shirai> (x-face-mule-x-face-decode-message-header))))
これを参考に、今まで
(setq mew-use-highlight-x-face-function
(function
(lambda (beg end)
(x-face-mule-x-face-decode-message-header beg end))))
で使っていたのを、
(add-hook 'mew-message-hook
(function
(lambda ()
(goto-char (point-min))
(if (and (re-search-forward "\n\n" nil t)
(re-search-backward "^X-Face:" nil t))
(x-face-mule-x-face-decode-message-header)))))
とすることで、使えるようになりました。
--
梅本 肇 @ インターネット互助会横浜
ume at example.com ume at example.com http://www.imasy.org/~ume/
プログラムは書いた人の意図ではなく書かれた通り動く
Mew-dist メーリングリストの案内