[Mew-Win32 03167] Re: mew-browse.el (1.95b121)

[Shuichi KITAGUCHI]

ちょっと古い話ですが、

城市> 1.95b121にアップデートした所、mew-browse.elが動かなくなって
城市> しまいました。URLを選択して"Y"するとエラーします。
城市> .emacsに何か設定を変える所がありますか？
城市> 環境は、WinNT4.0上のMeadow1.13b1++でmewは使っています。
城市> Backtraceは以下に示す様な感じでした。

城市> Signaling: (void-variable mew-ext-prog-url)
城市>   (symbolp mew-ext-prog-url)

白井> この変数は以前は Mew が設定してたのですが b120 で消えました。
白井> 適当に ^^;

白井> (setq mew-ext-prog-url "fiber")

白井> としておいてください。

を以下のようにしてみましたが、どうでしょうか?


--- mew-browse.el.original	Fri Apr 06 16:51:24 2001
+++ mew-browse.el	Wed May 09 00:33:36 2001
@@ -143,16 +143,16 @@
   (cond
    ((string-match "^mailto:" url)
     (mew-browse-url-mailto url))
-   ((and (symbolp mew-ext-prog-url) (fboundp mew-ext-prog-url))
-    (funcall mew-ext-prog-url url))
-   ((equal mew-ext-prog-url "w3")
+   ((equal mew-prog-text/html-ext "w3")
     (require 'w3)
     (w3-fetch-other-frame url))
    (t
     (apply (function start-process)
-	   (format "*mew %s*" mew-ext-prog-url)
-	   nil mew-ext-prog-url 
-	   (append mew-ext-prog-url-args (list url))))))
+	   (format "*mew %s*" mew-prog-text/html-ext)
+	   nil mew-prog-text/html-ext
+	   (append mew-prog-text/html-ext-arg (list url))))))
 
 (defun mew-url-mailto (url)
   "Exec mew-user-agent-compose with parsing RFC2368."


白井> # なんと消したのは私なのだった。^^;;;

白井> -- 
白井> 白井秀行＠やっぱはやまったか。。。

alist になっちゃってたんですね...


--
Shuichi Kitaguchi // ki at example.com