X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fre-engine-Plugin.git;a=blobdiff_plain;f=Plugin.pm;h=eb8aec09903736fe588cf4c7b427103f338b79e6;hp=df2a9f61fcb251818845411a34386164ecf6e73e;hb=8841074697e50dc9be0faf100e25e540968a2d9a;hpb=37642baad6c2d95e8a557017d221496095053def diff --git a/Plugin.pm b/Plugin.pm index df2a9f6..eb8aec0 100644 --- a/Plugin.pm +++ b/Plugin.pm @@ -6,7 +6,7 @@ use strict; our ($VERSION, @ISA); BEGIN { - $VERSION = '0.08'; + $VERSION = '0.09'; # All engines should subclass the core Regexp package @ISA = 'Regexp'; require XSLoader; @@ -20,7 +20,7 @@ sub import my ($pkg, %sub) = @_; # Valid callbacks - my @callback = qw(comp exec); + my @callback = qw; for (@callback) { next unless exists $sub{$_}; @@ -55,7 +55,7 @@ sub callbacks { my ($re, %callback) = @_; - my %map = map { $_ => "_$_" } qw/exec/; + my %map = map { $_ => "_$_" } qw; for my $key (keys %callback) { my $name = $map{$key};