[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
w3m version w3m/0.3.2.2-stable-m17n-20021207
- From: Hideyuki SHIRAI (
白井秀行
) <shirai@xxxxxxxxxxxxxxxxxxx>
- Date: Tue, 17 Dec 2002 15:10:13 +0900 (JST)
- X-ml-name: emacs-w3m
- X-mail-count: 04440
mew-dist で話があったのですが、
% w3m -version
w3m version w3m/0.3.2.2-stable-m17n-20021207, options lang=en,m17n,image,color,ansi-color,mouse,sysmouse,menu,cookie,ssl,ssl-verify,external-uri-loader,w3mmailer,nntp,gopher,ipv6,alarm,mark
の様に stable が入っている w3m-m17n の自動認識が出来ていなかった
ので変更しておきました。
(let ((commands '("/usr/local/bin/w3m" "/usr/local/bin/w3m-m17n"
"/usr/local/bin/w3m-m17n-stable"
"/usr/local/bin/w3mmee" "/usr/local/bin/w3mmee-nomoe"))
command)
(while (setq command (car commands))
(with-temp-buffer
(call-process command nil t nil "-version")
(goto-char (point-min))
(when (re-search-forward "version \\(w3m/0\\.3\
\\(\\.[0-9\\]\\)*\\(\\+cvs\\(-[0-9]+\\.[0-9]+\\)?\\)?\
\\(-inu\\|\\(\\(-stable\\)?-m17n\\|\\(\\+mee\\)\\)\\)?[^,]*\\)" nil t) ;; 変更
(setq hogev (match-string 1))
(setq hogec
(cond
((match-string 8) 'w3mmee) ;; 変更
((match-beginning 6) 'w3m-m17n)
((match-beginning 1) 'w3m)
(t 'other)))))
(insert (format "com: %s,\tver: %s,\ttype: %s\n"
command hogev hogec))
(setq commands (cdr commands))))
com: /usr/local/bin/w3m, ver: w3m/0.3.2.2+cvs-1.625, type: w3m
com: /usr/local/bin/w3m-m17n, ver: w3m/0.3.2.2+cvs-1.599-m17n-20021207, type: w3m-m17n
com: /usr/local/bin/w3m-m17n-stable, ver: w3m/0.3.2.2-stable-m17n-20021207, type: w3m-m17n
com: /usr/local/bin/w3mmee, ver: w3m/0.3.2+mee-p24-18+moe-1.5.3, type: w3mmee
com: /usr/local/bin/w3mmee-nomoe, ver: w3m/0.3.2+mee-p24-18, type: w3mmee
## nomoe は 'w3m が良いかも(けどまぁいいか)
P.S
info は年末年始休暇まで待ってくださいませ。(_ _)
--
白井秀行 (mailto:shirai@rdmg.mgcs.mei.co.jp)