Optimize #1718
This commit is contained in:
parent
a2b03dbbf7
commit
c496d979f5
|
@ -446,8 +446,7 @@ sub retrieveSession {
|
|||
|
||||
# 2. Get the session from cache or backend
|
||||
my $session = $req->data->{session} = (
|
||||
Lemonldap::NG::Common::Session->new(
|
||||
{
|
||||
Lemonldap::NG::Common::Session->new( {
|
||||
storageModule => $class->tsv->{sessionStorageModule},
|
||||
storageModuleOptions => $class->tsv->{sessionStorageOptions},
|
||||
cacheModule => $class->tsv->{sessionCacheModule},
|
||||
|
@ -751,8 +750,11 @@ sub localUnlog {
|
|||
|
||||
## @rmethod buildAndLoadType(string package)
|
||||
# Try to load type or build it
|
||||
my %alreadyBuilt;
|
||||
|
||||
sub buildAndLoadType {
|
||||
my ( $class, $package ) = @_;
|
||||
return if $alreadyBuilt{$package};
|
||||
eval "require $package";
|
||||
if ($@) {
|
||||
my $lastError = $@;
|
||||
|
@ -768,6 +770,7 @@ EOF
|
|||
die "Unable to build wrapper.\n First try: $lastError\n Auto-build: $@"
|
||||
if ($@);
|
||||
}
|
||||
$alreadyBuilt{$package} = 1;
|
||||
}
|
||||
|
||||
## @rmethod protected postOutputFilter(string uri)
|
||||
|
|
Loading…
Reference in New Issue