[mew-dist 18030] Re: Function mew-mime-text/html-w3m is not executable here.

[Hideyuki SHIRAI ( 白井秀行 )]

From: Tak Ota <Takaaki.Ota at example.com> さん曰く
Subject: [mew-dist 18026] Function mew-mime-text/html-w3m is not executable here.
Message-ID: <20010711.110344.78177414.Takaaki.Ota at example.com>
Date: Wed, 11 Jul 2001 11:03:44 -0700 (PDT)

ota> 添付内容が html であるにもかかわらずそ内容を Application/Octet-Stream 
ota> と指定して添付してあるメッセージを受け取りました。その添付内容を Mew 
ota> から直接 w3m で見ようと C-u C-c C-e で text/html と指定したところ

ota> Function mew-mime-text/html-w3m is not executable here.

ota> というメッセージが出て w3m を起動してくれません。

これをやりたいのだったら、

dot.mew.emacs の例の
(setq mew-prog-html '(mew-mime-text/html-w3m nil nil))

ではなく、

(setq mew-prog-html '(mew-mime-text/html mew-mime-text/html-ext))
;; ↑これは default 値
(setq mew-prog-text/html 'mew-mime-text/html-w3m)
(setq mew-prog-text/html-ext 'mew-mime-text/html-w3m)

とすれば OK です。dot.mew.emacs や mew-w3m.el の設定例もこっちの
方が良いかも。

だけど、試してみたら、mew-mime.el の mew-mime-text/html-ext() に
以下のパッチが必要でした。

# ぼくは
# (setq mew-prog-text/html 'mew-mime-text/html-w3m)
# (setq mew-prog-text/html-ext 'browse-url-of-region)
# としていますけど。

-- 
白井秀行 (mailto:shirai at example.com)

--- mew-mime.el.~1.25.~	Mon Jul  9 09:35:23 2001
+++ mew-mime.el	Thu Jul 12 10:04:41 2001
@@ -193,7 +193,9 @@
       (set-buffer cache)
       (setq source (mew-buffer-substring begin end))
       (set-buffer (mew-buffer-message))
-      (mew-elet (insert source))
+      (mew-elet
+       (mew-erase-buffer)
+       (insert source))
       (funcall mew-prog-text/html-ext (point-min) (point-max))))
    ((stringp mew-prog-text/html-ext)
     (when (> end begin)