mythwebで番組が表示できなくなったら

突然、mythwebの番組表が見れなくなった。

まあ、いろいろ調べてみると、番組サーバ？でブラウザ認識をしているようで、

mythwebでは、ブラウザ情報がなしに無しになっていたのが原因だ。

/usr/lib/perl5/vendor_perl/5.8.8/XMLTV/Get_nice.pm

を編集し

x$ua->agent("xmltv/$XMLTV::VERSION");

ここを

$ua->agent("Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)");

へ変更すると、なおるよ。

変更前

2009-02-14 22:13:14.730 New DB connection, total: 3
2009-02-14 22:13:14.731 Connected to database 'mythconverg' at host: localhost
チャンネル情報を取得中: could not fetch http://www.ontvjapan.com/program/gridChannel.php?tikicd=0003, error: 403 Forbidden, aborting

変更後

2009-02-14 22:16:29.245 New DB connection, total: 3
2009-02-14 22:16:29.246 Connected to database 'mythconverg' at host: localhost
チャンネル情報を取得中: ##################################################
番組表を取得中: ##################################################

という感じだ。