Take into account possible api errors
This commit is contained in:
@@ -191,6 +191,10 @@ MYHELP
|
|||||||
} elsif ($cmd =~ /^(admin|админ)$/u) {
|
} elsif ($cmd =~ /^(admin|админ)$/u) {
|
||||||
my $member = $self->getChatMember ({ 'chat_id' => 0 + $msg->chat->id, 'user_id' => 0 + $msg->from->id });
|
my $member = $self->getChatMember ({ 'chat_id' => 0 + $msg->chat->id, 'user_id' => 0 + $msg->from->id });
|
||||||
|
|
||||||
|
if ($member->{error}) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
# Это должно показываться только админам чата
|
# Это должно показываться только админам чата
|
||||||
if (($member->status eq 'administrator') || ($member->status eq 'creator')) {
|
if (($member->status eq 'administrator') || ($member->status eq 'creator')) {
|
||||||
$reply = << "MYADMIN";
|
$reply = << "MYADMIN";
|
||||||
@@ -227,6 +231,10 @@ MYADMIN
|
|||||||
} elsif ($cmd =~ /^admin\s+.+$/u || $cmd =~ /^админ\s+.+$/u) {
|
} elsif ($cmd =~ /^admin\s+.+$/u || $cmd =~ /^админ\s+.+$/u) {
|
||||||
my $member = $self->getChatMember ({ 'chat_id' => 0 + $msg->chat->id, 'user_id' => 0 + $msg->from->id });
|
my $member = $self->getChatMember ({ 'chat_id' => 0 + $msg->chat->id, 'user_id' => 0 + $msg->from->id });
|
||||||
|
|
||||||
|
if ($member->{error}) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
# Мьютить через бота можно только создателю чятика
|
# Мьютить через бота можно только создателю чятика
|
||||||
if (($member->status eq 'creator') && $cmd =~ /^(admin|админ)\s+mute\s+(\d+)\s+(\d+)$/gu) {
|
if (($member->status eq 'creator') && $cmd =~ /^(admin|админ)\s+mute\s+(\d+)\s+(\d+)$/gu) {
|
||||||
my (undef, undef, $user_id_to_mute, $time) = split /\s+/, $cmd;
|
my (undef, undef, $user_id_to_mute, $time) = split /\s+/, $cmd;
|
||||||
@@ -234,7 +242,7 @@ MYADMIN
|
|||||||
# Бот должен быть админом, чтобы мьютить юзеров
|
# Бот должен быть админом, чтобы мьютить юзеров
|
||||||
my $me = $self->getMe ();
|
my $me = $self->getMe ();
|
||||||
|
|
||||||
if (defined $me->{error}) {
|
if ($me->{error}) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -245,7 +253,7 @@ MYADMIN
|
|||||||
} else {
|
} else {
|
||||||
$me = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $me->id});
|
$me = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $me->id});
|
||||||
|
|
||||||
if (defined $me->{error}) {
|
if ($me->{error}) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -253,7 +261,7 @@ MYADMIN
|
|||||||
# Проверим, что такой юзер есть в чятике
|
# Проверим, что такой юзер есть в чятике
|
||||||
my $chatMember = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $user_id_to_mute});
|
my $chatMember = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $user_id_to_mute});
|
||||||
|
|
||||||
if (defined $chatMember->{error}) {
|
if ($chatMember->{error}) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -103,8 +103,7 @@ sub __on_msg {
|
|||||||
unless ($myid) {
|
unless ($myid) {
|
||||||
my $myObj = $self->getMe ();
|
my $myObj = $self->getMe ();
|
||||||
|
|
||||||
unless ($myObj) {
|
if ($myObj->{error}) {
|
||||||
$log->error ('[ERROR] Unable to get chatid, API Error?');
|
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user