Changeset 1417

Show
Ignore:
Timestamp:
08/19/06 18:44:35
Author:
miyagawa
Message:

fixed UUV in 2chRSSContent

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/lib/Plagger/Plugin/Filter/2chRSSContent.pm

    r1402 r1417  
    1717 
    1818    my $body = $args->{entry}->body; 
    19     if ($body =~ s!^([^:]*):(\d{4}/\d\d/\d\d)\(.*?\) (\d\d:\d\d:\d\d)(?:\.\d\d)? (ID:\S+)?  ?!!) { 
     19    if ($body && $body =~ s!^([^:]*):(\d{4}/\d\d/\d\d)\(.*?\) (\d\d:\d\d:\d\d)(?:\.\d\d)? (ID:\S+)?  ?!!) { 
    2020        my($from, $day, $time, $id) = ($1, $2, $3, $4); 
    2121        my $date = Plagger::Date->strptime('%Y/%m/%d %H:%M:%S', "$day $time"); 
     
    2828        $args->{entry}->body($body); 
    2929    } elsif ($args->{entry}->title =~ /^\d+\-$/ 
    30              || $args->{entry}->body =~ m!http://www\.2ch\.net/ad\.html *powerd by Big-Server\.!) { 
     30             || ($body && $body =~ m!http://www\.2ch\.net/ad\.html *powerd by Big-Server\.!)) { 
    3131        $context->log(info => "Strip 2ch bogus entry " . $args->{entry}->title); 
    3232        $args->{feed}->delete_entry($args->{entry});