Changeset 185
- Timestamp:
- 02/27/06 06:32:41
- Files:
-
- trunk/plagger/lib/Plagger/Plugin/Filter/TTP.pm (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Plugin/Filter/TTP.pm
r184 r185 3 3 use base qw( Plagger::Plugin ); 4 4 use URI::Find; 5 6 {7 package URI::ttp;8 use base qw(URI::http);9 }10 5 11 6 sub register { … … 20 15 my($self, $context, $args) = @_; 21 16 my $body = $args->{entry}->body; 17 18 local @URI::ttp::ISA = qw(URI::http); 22 19 23 20 my $finder = URI::Find->new(sub { … … 36 33 =head1 NAME 37 34 38 Plagger::Plugin::Filter::TTP - auto link thettp://35 Plagger::Plugin::Filter::TTP - Replace ttp:// with http:// 39 36 40 37 =head1 SYNOPSIS … … 44 41 =head1 DESCRIPTION 45 42 46 ttp:// => http:// 43 This plugin replaces C<ttp://> with C<http://>. C<ttp://> is a widely 44 adopted way of linking an URL without leaking a referer. 47 45 48 46 =head1 AUTHOR
