Changeset 1271


Ignore:
Timestamp:
Jun 15, 2010, 11:57:15 PM (8 years ago)
Author:
max
Message:

ten_website: Source seems to be displaying wrong timestamps for non-EST

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/grabbers/ten_website

    r1224 r1271  
    99 
    1010my $progname = "ten_website"; 
    11 my $version = "2.03"; 
     11my $version = "2.10"; 
    1212 
    1313use XMLTV; 
     
    338338                } 
    339339 
    340                 my $prog_start = substr($show->{startTime},0,10); 
    341                 my $prog_stop =  substr($show->{endTime},0,10); 
     340                # Alas, startTime and endTime fields appear to be  
     341                # incorrect for non-EST locations (as at 16-Jun-10). 
     342                # 
     343                #my $prog_start = substr($show->{startTime},0,10); 
     344                #my $prog_stop =  substr($show->{endTime},0,10); 
     345 
     346                my @start_time_a = ( 0 ); 
     347                $show->{'startDateText'} =~ /(\d+)-(\d+)-(\d+)/  
     348                    and $start_time_a[5] = $1 - 1900 
     349                    and $start_time_a[4] = $2 - 1 
     350                    and $start_time_a[3] = $3; 
     351                $show->{'startTimeText'} =~ /(\d+):(\d+)(\w+)/ 
     352                    and $start_time_a[2] = ($3 eq 'AM' ? $1 : $1 + 12) 
     353                    and $start_time_a[1] = $2; 
     354 
     355                my $prog_start = POSIX::mktime(@start_time_a); 
     356                my $prog_stop = $prog_start + ($show->{'duration'} * 60); 
    342357 
    343358                # only fetch within start/end times specified. 
     
    369384                $stats{programmes}++; 
    370385 
    371                 &log(sprintf " %3d. %s", $stats{programmes}, $show->{program_name}) if ($opt->{debug}); 
     386                &log(sprintf " %3d. %-40s (%s)", $stats{programmes}, $show->{program_name}, $prog->{start}) if ($opt->{debug}); 
    372387        } 
    373388 
  • trunk/status

    r1270 r1271  
    1010grabber         foxtel_swf          2.03 
    1111grabber         southerncross_website   0.21 
    12 grabber         ten_website         2.03 
     12grabber         ten_website         2.10 
    1313grabber         citysearch          3.0.1-r5 
    1414grabber         acctv_website       0.08-r1 
Note: See TracChangeset for help on using the changeset viewer.