Changeset 1364

Show
Ignore:
Timestamp:
04/05/11 22:24:51 (2 years ago)
Author:
max
Message:

chanscan.pl: Fix for Yahoo

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/util/chanscan.pl

    r1313 r1364  
    6363    $content = &Shepherd::Common::get_url($DATASOURCE2 . $region . '/0/'); 
    6464    $tree = HTML::TreeBuilder->new_from_content($content); 
    65     foreach my $tag ($tree->look_down('_tag' => 'li', 'class' => 'row channel')) 
     65    foreach my $tag ($tree->look_down('_tag' => 'li')) 
    6666    { 
     67        next unless ($tag->attr('class') and $tag->attr('class') =~ /row channel/); 
    6768        my $h3 = $tag->look_down('_tag' => 'h3'); 
    6869        my $chan = $h3->as_text();