Use eval on lazy brain init

This commit is contained in:
eleksir
2022-01-01 03:47:22 +03:00
parent 64c8300f93
commit 240712bf42

View File

@@ -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;