Changeset Navigation

Changeset 211

Timestamp:

03/01/06 10:26:49

Author:

miyagawa

Message:

Fixed Filter::StripRSSAd bug that it doesn't work with Bloglines subscription.
Thanks to http://d.hatena.ne.jp/s_nobu/20060301

Files:

r142	r211
13	13	sub update {
14	14	my($self, $context, $args) = @_;
15		my $body = $self->filter($args->{~~feed}->url, $args->{~~entry}->body);
	15	my $body = $self->filter($args->{entry}->body);
16	16	$args->{entry}->body($body);
17	17	}
18	18
19	19	sub filter {
20		my($self, $~~link, $~~body) = @_;
	20	my($self, $body) = @_;
21	21
22	22	# rssad.jp
23		if ($link =~ m!^http://rss\.rssad\.jp/rss!) {
24		my $count = $body =~ s!<br clear="all" /><a href="http://rss\.rssad\.jp/rss/ad/.?" target="_blank".?><img .? src="http://rss\.rssad\.jp/rss/img/.?" border="0"/></a><br/>!!;
25		Plagger->context->log(debug => "Stripped rssad.jp ad") if $count;
26		}
	23	my $count = $body =~ s!<br clear="all" /><a href="http://rss\.rssad\.jp/rss/ad/.?" target="_blank".?><img .? src="http://rss\.rssad\.jp/rss/img/.?" border="0"/></a><br.*?>!!;
	24	Plagger->context->log(debug => "Stripped rssad.jp ad") if $count;
27	25
28	26	# plaza.rakuten.co.jp
29		if ($link =~ m!^http://api\.plaza\.rakuten\.ne\.jp/!) {
30		my $count = $body =~ s!<br clear?=all /><br><SMALL>\n<SCRIPT LANGUAGE="Javascript">\n<\!--\nfunction random.?</SCRIPT>\n<NOSCRIPT>.?</NOSCRIPT>\n</SMALL>\n!!s;
31		Plagger->context->log(debug => "Stripped plaza.rakuten ad") if $count;
32		}
	27	my $count = $body =~ s!<br clear?=all /><br><SMALL>\n(?:<SCRIPT LANGUAGE="Javascript">\n<\!--\nfunction random.?infoseek.?RssPlaza.</SCRIPT>)?\n<NOSCRIPT>.?infoseek.?RssPlaza.?</NOSCRIPT>\n</SMALL>!!s;
	28	Plagger->context->log(debug => "Stripped plaza.rakuten ad") if $count;
33	29
34	30	# Google AdSense for Feeds