Changeset 594
- Timestamp:
- 04/15/06 17:07:25
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger.pm
r590 r594 189 189 } 190 190 191 sub autoload_plugin { 192 my($self, $plugin) = @_; 193 unless ($self->is_loaded($plugin)) { 194 $self->load_plugin({ module => $plugin }); 195 } 196 } 197 191 198 sub is_loaded { 192 199 my($self, $stuff) = @_; trunk/plagger/lib/Plagger/Plugin/Filter/StripRSSAd.pm
r435 r594 2 2 use strict; 3 3 use base qw( Plagger::Plugin ); 4 5 sub init { 6 my $self = shift; 7 $self->SUPER::init(@_); 8 Plagger->context->autoload_plugin('Filter::BloglinesLinkAttrStripper'); 9 } 4 10 5 11 sub register { … … 48 54 Plagger->context->log(debug => "Stripped Seesaa Ads on $link") if $count; 49 55 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 50 60 $body; 51 61 }
