Changeset 399

Show
Ignore:
Timestamp:
03/14/06 20:33:02
Author:
miyagawa
Message:
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm

    r384 r399  
    4545    my($self, $url, $xml_ref) = @_; 
    4646 
     47    my $context = Plagger->context; 
     48 
    4749    my $args = { content => $$xml_ref }; 
    48     Plagger->context->run_hook('aggregator.filter.feed', $args); 
     50    $context->run_hook('aggregator.filter.feed', $args); 
    4951 
    50     my $context = Plagger->context; 
    5152    my $remote = eval { XML::Feed->parse(\$args->{content}) }; 
    5253 
    …… 
    103104        $entry->body($e->content->body); 
    104105 
     106        my $args = { 
     107            entry      => $entry, 
     108            feed       => $feed, 
     109            orig_entry => $e, 
     110            orig_feed  => $remote, 
     111        }; 
     112        $context->run_hook('aggregator.entry.fixup', $args); 
     113 
    105114        $feed->add_entry($entry); 
    106115    } 

  • trunk/plagger/lib/Plagger/Plugin/Filter/FeedBurnerPermalink.pm

    r181 r399  
    77    $context->register_hook( 
    88        $self, 
    9         'update.entry.fixup' => \&filter, 
     9        'aggregator.entry.fixup' => \&fixup, 
    1010    ); 
    1111} 
    1212 
    13 sub filter { 
     13sub fixup { 
    1414    my($self, $context, $args) = @_; 
    1515 
    16     my $entry = $args->{entry}; 
    17     if ($entry->link =~ m!^http://feeds\.feedburner\.(com|jp)/!) { 
    18         $entry->permalink( $entry->id . "" ); # stringify guid 
     16    # RSS 1.0 & 2.0 
     17    if (my $orig_link = $args->{orig_entry}->{entry}->{'http://rssnamespace.org/feedburner/ext/1.0'}->{origLink}) { 
     18        $args->{entry}->permalink($orig_link); 
     19        $context->log(info => "Permalink rewritten to $orig_link"); 
    1920    } 
    2021}