Fix three typos since last commit
This commit is contained in:
@@ -99,12 +99,12 @@ sub fish {
|
|||||||
'на крышу дома',
|
'на крышу дома',
|
||||||
);
|
);
|
||||||
|
|
||||||
my @material = {
|
my @material = (
|
||||||
'бамбуковую',
|
'бамбуковую',
|
||||||
'фиберглассовую',
|
'фиберглассовую',
|
||||||
'карбоновую',
|
'карбоновую',
|
||||||
'композитную',
|
'композитную',
|
||||||
}
|
);
|
||||||
|
|
||||||
my $find_probability = irand 100;
|
my $find_probability = irand 100;
|
||||||
my $success_probability = irand 100;
|
my $success_probability = irand 100;
|
||||||
|
|||||||
@@ -114,7 +114,7 @@ sub __on_msg {
|
|||||||
my @members = '';
|
my @members = '';
|
||||||
|
|
||||||
foreach my $member (@{$msg->new_chat_members}) {
|
foreach my $member (@{$msg->new_chat_members}) {
|
||||||
$member_str = '[';
|
my $member_str = '[';
|
||||||
|
|
||||||
if ($member->can ('first_name') && defined ($member->first_name)) {
|
if ($member->can ('first_name') && defined ($member->first_name)) {
|
||||||
$member_str .= $member->first_name;
|
$member_str .= $member->first_name;
|
||||||
|
|||||||
Reference in New Issue
Block a user