formatting
parent
532d4b0d5f
commit
a4d693f659
|
@ -27,12 +27,13 @@ sub filter (@) {
|
|||
encode_entities($content);
|
||||
my $finder = URI::Find->new(
|
||||
sub {
|
||||
my($uri, $orig_uri) = @_;
|
||||
my ($uri, $orig_uri) = @_;
|
||||
return qq|<a href="$uri">$orig_uri</a>|;
|
||||
});
|
||||
$finder->find(\$content);
|
||||
$content = "<pre>" . $content . "</pre>";
|
||||
}
|
||||
|
||||
return $content;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue