Use eval on lazy brain init
This commit is contained in:
@@ -115,17 +115,19 @@ sub brains (@) {
|
|||||||
|
|
||||||
my $brainname = sprintf '%s/%s.sqlite', $c->{braindir}, $cid;
|
my $brainname = sprintf '%s/%s.sqlite', $c->{braindir}, $cid;
|
||||||
|
|
||||||
$hailo->{$chatid} = Hailo->new (
|
$hailo->{$chatid} = eval {
|
||||||
brain => $brainname,
|
Hailo->new (
|
||||||
order => 3
|
brain => $brainname,
|
||||||
);
|
order => 3
|
||||||
|
);
|
||||||
|
};
|
||||||
|
|
||||||
unless (defined $hailo->{$chatid}) {
|
if (defined $hailo->{$chatid}) {
|
||||||
|
$log->info (sprintf 'Lazy init brain: %s', $brainname);
|
||||||
|
} else {
|
||||||
$log->warn ($EVAL_ERROR);
|
$log->warn ($EVAL_ERROR);
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
$log->info (sprintf 'Lazy init brain: %s', $brainname);
|
|
||||||
}
|
}
|
||||||
|
|
||||||
return 1;
|
return 1;
|
||||||
|
|||||||
Reference in New Issue
Block a user