[Mew-Win32 00173] Re: fiber & browse-url

[Hideyuki SHIRAI]

白井です。

# ひとつだけ……

From: Kazumi HARA <hara at example.com> さん曰く
Subject: [Mew-Win32 00172] Re: fiber & browse-url
Message-ID: <19980203175940T.hara at example.com>
Date: Tue, 3 Feb 1998 17:58:52 +0900

hara> P.S. ブラウザが C:/Program Files/ の下に有る事が何か問題を起こす可能性
hara>   ってあります?

えっと、この間の私のメールに書いた、

(defun netscape (url)
  "NetScape!!"
  (interactive "surl: ")
  (if (string-match "^$" url)
      (apply 'start-process "netscape" nil
	     "c:/APR/NETSCAPE/Program/netscape.exe" nil)
    (apply 'start-process "netscape" nil
	 "c:/APR/NETSCAPE/Program/netscape.exe" (list url))))

と似たような感じで

(defun ie (url)
  (interactive "surl: ")
  (if (string-match "^$" url)
      (progn (message "start: Internet Explore with home.")
	     (apply 'start-process "ie" nil	
		    "C:/Program Files/Internet Explorer/IEXPLORE.EXE" nil))
    (progn (message "start: Internet Explore %s." url)
	   (apply 'start-process "ie" nil
		  "C:/Program Files/Internet Explorer/IEXPLORE.EXE" (list url)))))
                            ~~~            ~~~
も使っていますが、動いてますよ。(滅多に使わないけど…)

P.S.
(setq browse-url-regexp "\\(\\([^\-A-Z ……)のバグ等ありましたら
どんどん教えて下さい。

# 採用された割に、正直言って自信が無い。^^;

特に、メールアドレスなのかMessage-IDなのかの切り分けがしたい……

それで、NetNewsのMessage-IDなら http://mitsuko.jaist.ac.jp/fj に
探しにいくというのを最終形態にしたいのです。
どなたか、アイデアありませんか？

--
白井秀行 (Hideyuki SHIRAI)@そろそろ、mewのVersion-UPかなぁ。