User sendMessage directly via global object, without sugar
This commit is contained in:
@@ -208,7 +208,12 @@ sub __on_msg {
|
|||||||
}
|
}
|
||||||
|
|
||||||
sleep 2;
|
sleep 2;
|
||||||
my $res = $msg->replyMd ($phrase);
|
my $m->{text} = $phrase;
|
||||||
|
$m->{chat_id} = $chatid;
|
||||||
|
$m->{disable_notification} = 1;
|
||||||
|
$m->{parse_mode} = 'Markdown';
|
||||||
|
|
||||||
|
my $res = $main::TGM->sendMessage ($m);
|
||||||
|
|
||||||
if ($res->{error}) {
|
if ($res->{error}) {
|
||||||
$log->error ("Unable to call sendMessage BotAPI method: " . Dumper ($res));
|
$log->error ("Unable to call sendMessage BotAPI method: " . Dumper ($res));
|
||||||
@@ -253,7 +258,13 @@ sub __on_msg {
|
|||||||
);
|
);
|
||||||
|
|
||||||
sleep 2;
|
sleep 2;
|
||||||
my $res = $msg->replyMd ($phrase);
|
|
||||||
|
my $m->{text} = $phrase;
|
||||||
|
$m->{chat_id} = $chatid;
|
||||||
|
$m->{disable_notification} = 1;
|
||||||
|
$m->{parse_mode} = 'Markdown';
|
||||||
|
|
||||||
|
my $res = $main::TGM->sendMessage ($m);
|
||||||
|
|
||||||
if ($res->{error}) {
|
if ($res->{error}) {
|
||||||
$log->error ("Unable to call sendMessage BotAPI method: " . Dumper ($res));
|
$log->error ("Unable to call sendMessage BotAPI method: " . Dumper ($res));
|
||||||
|
|||||||
Reference in New Issue
Block a user