X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=Plugin.pm;h=93ac7e68a116a1bd097726f43930760de6a084d6;hb=5432eb59f83cbde4b5f7444bd849ef3bac4c2365;hp=a641a8116faef34360ee64d57910b1f02e1f5b66;hpb=83e9c4cdd31cc9832f19af403a27b0b417310dd9;p=perl%2Fmodules%2Fre-engine-Plugin.git diff --git a/Plugin.pm b/Plugin.pm index a641a81..93ac7e6 100644 --- a/Plugin.pm +++ b/Plugin.pm @@ -6,7 +6,7 @@ use strict; our ($VERSION, @ISA); BEGIN { - $VERSION = '0.07'; + $VERSION = '0.10'; # 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};