etc.txt に
> navi2ch
> http://navi2ch.sourceforge.net/log/
> navi2ch
を書いてから、
http://navi2ch.sourceforge.net/cgi-bin/wiki/yapw.cgi/Tips
なんかも navi2ch で開こうとする。
navi2ch-2ch-url-p が host しか見てないのがマズい？

てきとーに書き換えてみた。

(defun navi2ch-2ch-url-p (url)
"URL が 2ch 内の url であれば non-nil を返す。"
(let ((host (navi2ch-url-to-host url)))
(and (or (member host navi2ch-2ch-host-list)
(dolist (2ch-url
(mapcar (lambda (x)
(cdr (assq 'uri x)))
navi2ch-list-board-name-list))
(and 2ch-url
(string-match (concat "^" 2ch-url) url)
(return url))))
(or (navi2ch-article-url-to-article url)
(navi2ch-board-url-to-board url))
t)))