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