[mythtv-users] Re: Most reliable path to a working MythTV system?

[Eric Thirolle]

It is quite easy to manually edit 'ZapListings.pm' to make xmltv work in
KnoppMyth. You have to do it before the MythTV backend setup step completes.
I got this from
http://sourceforge.net/mailarchive/forum.php?thread_id=3489914 :

Update of /cvsroot/xmltv/xmltv/grab/na
 In directory sc8-pr-cvs1:/tmp/cvs-serv745

 Modified Files:
  ZapListings.pm
 Log Message:
 slight change to zap2it site causing failures

 Index: ZapListings.pm
 ===================================================================
 RCS file: /cvsroot/xmltv/xmltv/grab/na/ZapListings.pm,v
 retrieving revision 1.72
 retrieving revision 1.73
 diff -C2 -d -r1.72 -r1.73
 *** ZapListings.pm 9 Nov 2003 21:10:08 -0000 1.72
 --- ZapListings.pm 19 Nov 2003 02:34:31 -0000 1.73
 ***************
 *** 876,883 ****
       while ( $content=~s/<SELECT(.*)(?=<\/SELECT>)//ios ) {
           my $options=$1;
 !         while ( $options=~s/<OPTION
value="(\d+)">([^<]+)<\/OPTION>//ios ) {
        my $p;
        $p->{id}=$1;
 !      $p->{description}=$2;
               #main::debugMessage("provider $1 ($2)\n";
        push(@{$self->{ProviderList}->{$self->{GeoCode}}}, $p);
 --- 876,883 ----
       while ( $content=~s/<SELECT(.*)(?=<\/SELECT>)//ios ) {
           my $options=$1;
 !         while ( $options=~s/<OPTION
value="(\d+)"\s*>([^<]+)<\/OPTION>//ios ) {
        my $p;
        $p->{id}=$1;
 !      $p->{description}=massageText($2);
               #main::debugMessage("provider $1 ($2)\n";
        push(@{$self->{ProviderList}->{$self->{GeoCode}}}, $p);

Hope that helps,

Eric Thirolle