dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Restore available() conf (Closes: #1934)

Browse Source
This commit is contained in:
Xavier Guimard 2019-09-16 16:08:19 +02:00
parent 7e2de7853b
commit fe2cc803f7
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf.pm
View File

@ -400,18 +400,18 @@ sub getDBConf {
sub _launch {
my $self = shift;
my $sub = shift;
my $res;
my @res;
eval {
local $SIG{ALRM} = sub { die "TIMEOUT\n" };
eval {
alarm( $self->{confTimeout} || 10 );
$res = &{ $self->{type} . "::$sub" }( $self, @_ );
@res = &{ $self->{type} . "::$sub" }( $self, @_ );
};
alarm 0;
die $@ if $@;
};
$msg .= $@ if $@;
return $res;
return wantarray ? (@res) : $res[0];
}
## @method boolean prereq()