Changeset 538

Show
Ignore:
Timestamp:
02/21/07 04:19:54 (6 years ago)
Author:
lincoln
Message:

max noticed yahoo7web mishandled programmes spanning midnight

Files:
2 modified

Legend:

Unmodified
Added
Removed

  • grabbers/yahoo7web

    r524 r538  
    88 
    99my $progname = "yahoo7web"; 
    10 my $version = "0.10"; 
     10my $version = "0.11"; 
    1111 
    1212use LWP::UserAgent; 
    … …  
    579579                                        if ($listing_text =~ /^(.*)\((\d+)\)(\d+):(\d+)(.)m - (\d+):(\d+)(.)m$/i) { 
    580580                                                my ($rating_text, $prog_length, $start_sec, $stop_sec) = ($1, $2, parse_time($3, $4, $5), parse_time($6, $7, $8)); 
    581  
     581                                                $stop_sec += (60*60*24) if ($stop_sec < $start_sec); # program wrap around midnight 
    582582                                                $prog->{rating} = [[ $rating_text, 'ABA', undef ]] if ((defined $rating_text) && ($rating_text ne "")); 
    583583                                                $prog->{length} = ($prog_length * 60) if ((defined $prog_length) && ($prog_length > 0)); 

  • status

    r536 r538  
    88grabber         jrobbo              0.06 
    99grabber         ninemsn             0.12 
    10 grabber         yahoo7web           0.10 
     10grabber         yahoo7web           0.11 
    1111grabber         ten_website         0.05 
    1212reconciler      reconciler_mk2      0.20