eleksir/aleesa-jabber-bot
1
Fork 0
Code Activity

More heavy perlcritic policies, more careful work with strings/substr

Browse Source
This commit is contained in:
eleksir
2022-04-03 13:45:02 +03:00
parent 5e53450221
commit f18544a798
22 changed files with 271 additions and 227 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/BotLib/Lat.pm
View File

@@ -35,7 +35,7 @@ sub Train () {
my $lat = Hailo->new (
brain => $brain,
# in our case mean amount of words in phase is 3
order => 2
order => 2,
);
$lat->train ($srcfile);
@@ -54,7 +54,7 @@ sub Lat () {
return '';
}
unless (-f $brain) {
unless (-e $brain) {
$log->error ("[ERROR] No lat module data: $brain is absent! Train lat first.");
return '';
}
@@ -63,7 +63,7 @@ sub Lat () {
brain => $brain,
# in our case mean amount of words in phase is 3
order => 2,
save_on_exit => 0
save_on_exit => 0,
);
return $lat->reply ();