This commit is contained in:
Xavier Guimard 2019-04-23 14:33:43 +02:00
parent b736b2c638
commit a2b03dbbf7
1 changed files with 1 additions and 1 deletions

View File

@ -758,7 +758,7 @@ sub buildAndLoadType {
my $lastError = $@;
my $main = $package;
$main =~ s/::([^:]*)$/::Main/;
my $type = $2 or die "Malformed package $package";
my $type = $1 or die "Malformed package $package";
eval <<EOF;
package $package;
use base 'Lemonldap::NG::Handler::Lib::$type',