Changeset 782

Show
Ignore:
Timestamp:
05/19/06 00:01:53
Author:
woremacx
Message:

decode regexp

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/lib/Plagger/Plugin/Filter/Regexp.pm

    r415 r782  
    22use strict; 
    33use base qw( Plagger::Plugin::Filter::Base ); 
     4use Encode; 
    45 
    56sub init { 
     
    1718 
    1819    local $_ = $body; 
    19     my $count = eval $self->conf->{regexp}; 
     20    my $regexp = decode_utf8($self->conf->{regexp}, Encode::FB_CROAK); 
     21    my $count = eval $regexp; 
    2022 
    2123    if ($@) {