Do not answer in chat if quoted mention less than 4 chars.
This commit is contained in:
@@ -361,7 +361,7 @@ MYHELP
|
|||||||
$phrase =~ s/$pat2//g;
|
$phrase =~ s/$pat2//g;
|
||||||
|
|
||||||
# figure out reply :)
|
# figure out reply :)
|
||||||
$reply = $hailo->{$msg->chat->id}->learn_reply ($phrase);
|
$reply = $hailo->{$msg->chat->id}->learn_reply ($phrase) if (length ($phrase) > 3);
|
||||||
# simple commands
|
# simple commands
|
||||||
# TODO: Log commands and answers
|
# TODO: Log commands and answers
|
||||||
} elsif (substr ($text, 0, 1) eq $c->{telegrambot}->{csign}) {
|
} elsif (substr ($text, 0, 1) eq $c->{telegrambot}->{csign}) {
|
||||||
|
|||||||
Reference in New Issue
Block a user