Changeset 281

Timestamp:

03/05/06 02:31:49

Author:

miyagawa

Message:

Filter::Regexp: fixed text_only to handle HTML entities (Thanks to tokuhirom)

Files:

• trunk/plagger/lib/Plagger/Plugin/Filter/Regexp.pm (modified) (2 diffs)

trunk/plagger/lib/Plagger/Plugin/Filter/Regexp.pm

@@ -2 +2 @@
-use strict;
-use base qw( Plagger::Plugin );
+
+use HTML::Entities;
-
-sub register {
@@ -58 +60 @@
-    $p->handler( default => sub { $output .= $_[0] }, "text" );
-    $p->handler( text => sub {
-$_[0], $regexp
+ decode_entities($_[0]), $regexp 
-        $count  += $c;
-$body
+encode_entities($body, q("<>&))
-    }, "text");
-