チェンジセット 112: trunk/install/perl/epgimport.pl
- コミット日時:
- 2010/08/23 00:10:13 (14 年前)
- ファイル:
凡例:
- 変更無し
- 追加
- 削除
- 更新
- コピー
- 移動
trunk/install/perl/epgimport.pl
r111 r112 89 89 $channel = $data[0]; 90 90 $ontvcode = $data[1]; 91 &writelog("epgimport DEBUG Single station mode (ch:$channel / $ontvcode)."); 92 } 91 if ($channel > 0){ 92 &writelog("epgimport DEBUG Single station mode (ch:$channel / $ontvcode)."); 93 }else{#ラジオ局などの場合 94 &writelog("epgimport ABORT SID $stationid is not Digital TV ch."); 95 exit; 96 }#endif ラジオ局かどうか 97 }#end unless($data[0] == 1 93 98 }#endif $stationid > 0 94 99