Index: /trunk/install/perl/db/Pg.pl =================================================================== --- /trunk/install/perl/db/Pg.pl (リビジョン 124) +++ /trunk/install/perl/db/Pg.pl (リビジョン 132) @@ -74,5 +74,5 @@ 'updatem2pfiletable.4' => "INSERT into foltia_mp4files values (?, ?)", -'xmltv2foltia.replaceepg.1' => "SELECT * FROM foltia_epg WHERE enddatetime > ? AND startdatetime < ? AND ontvchannel = ? AND startdatetime > ?", +'xmltv2foltia.replaceepg.1' => "SELECT * FROM foltia_epg WHERE enddatetime > ? AND startdatetime < ? AND ontvchannel = ?", 'xmltv2foltia.replaceepg.2' => "SELECT * FROM foltia_epg WHERE startdatetime = ? AND enddatetime = ? AND ontvchannel = ? ", 'xmltv2foltia.commitdb.1' => "DELETE FROM foltia_epg WHERE epgid = ?", Index: /trunk/install/perl/xmltv2foltia.pl =================================================================== --- /trunk/install/perl/xmltv2foltia.pl (リビジョン 130) +++ /trunk/install/perl/xmltv2foltia.pl (リビジョン 132) @@ -224,9 +224,6 @@ $foltiaendtime = substr($foltiaendtime,0,12); # 12桁 200508072355 -#$sth = $dbh->prepare($stmt{'xmltv2foltia.replaceepg.1'}); -$sth = $dbh->prepare("SELECT * FROM foltia_epg WHERE enddatetime > ? AND startdatetime < ? AND ontvchannel = ?"); - +$sth = $dbh->prepare($stmt{'xmltv2foltia.replaceepg.1'}); my $now = &epoch2foldate(time()); -#$sth->execute($foltiastarttime , $foltiaendtime , $ontvepgchannel,$now); $sth->execute($foltiastarttime , $foltiaendtime , $ontvepgchannel); while (@data = $sth->fetchrow_array()) {