Changeset 594

Show
Ignore:
Timestamp:
04/15/06 17:07:25
Author:
miyagawa
Message:
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/lib/Plagger.pm

    r590 r594  
    189189} 
    190190 
     191sub autoload_plugin { 
     192    my($self, $plugin) = @_; 
     193    unless ($self->is_loaded($plugin)) { 
     194        $self->load_plugin({ module => $plugin }); 
     195    } 
     196} 
     197 
    191198sub is_loaded { 
    192199    my($self, $stuff) = @_; 
  • trunk/plagger/lib/Plagger/Plugin/Filter/StripRSSAd.pm

    r435 r594  
    22use strict; 
    33use base qw( Plagger::Plugin ); 
     4 
     5sub init { 
     6    my $self = shift; 
     7    $self->SUPER::init(@_); 
     8    Plagger->context->autoload_plugin('Filter::BloglinesLinkAttrStripper'); 
     9} 
    410 
    511sub register { 
     
    4854    Plagger->context->log(debug => "Stripped Seesaa Ads on $link") if $count; 
    4955 
     56    # NPR valueclick ads 
     57    $count = $body =~ s!<p>\s*<a href="http://ads\.npr\.valueclick\.net/redirect\?host=hs.*?" target="_top">\s*<img border="0" .*? src="http://ads\.npr\.valueclick\.net/cycle\?host=hs.*?" />\s*</a>!!g; 
     58    Plagger->context->log(debug => "Stripped valueclick ads on $link") if $count; 
     59 
    5060    $body; 
    5161}