aleesa-bot/aleesa-telegram
0
Fork 0
Code Pull Requests Projects Releases Activity

Add quirk for api incosistency in reactions

Browse Source
This commit is contained in:
eleksir
2025-05-08 17:01:15 +03:00
parent d21bab68ef
commit 2b675cdfa6
2 changed files with 33 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
lib/BotLib/Util.pm
View File

@@ -89,6 +89,8 @@ sub Highlight {
return ($userid, $username, $fullname, $highlight, undef); return ($userid, $username, $fullname, $highlight, undef);
} }
my $userid;
if ($msg->can ('from')) {
$userid = $msg->from->id; $userid = $msg->from->id;
if ($msg->from->can ('username') && defined $msg->from->username ) { if ($msg->from->can ('username') && defined $msg->from->username ) {
@@ -104,7 +106,24 @@ sub Highlight {
} elsif ($msg->from->can ('last_name') && defined $msg->from->last_name) { } elsif ($msg->from->can ('last_name') && defined $msg->from->last_name) {
$fullname .= $msg->from->last_name; $fullname .= $msg->from->last_name;
} }
} else {
# Reacions case.
$userid = $msg->user->id;
if ($msg->user->can ('username') && defined $msg->user->username ) {
$username = $msg->user->username;
}
if ($msg->user->can ('first_name') && defined $msg->user->first_name) {
$fullname = $msg->user->first_name;
if ($msg->user->can ('last_name') && defined $msg->user->last_name) {
$fullname .= ' ' . $msg->user->last_name;
}
} elsif ($msg->user->can ('last_name') && defined $msg->user->last_name) {
$fullname .= $msg->user->last_name;
}
}
if (defined $username) { if (defined $username) {
$visavi .= '@' . $username; $visavi .= '@' . $username;

2
lib/Teapot/Bot/Object/MessageReactionUpdated.pm
View File

@@ -10,7 +10,7 @@ use Mojo::Base 'Teapot::Bot::Object::Base';
use Teapot::Bot::Object::Chat (); use Teapot::Bot::Object::Chat ();
use Teapot::Bot::Object::Chat (); use Teapot::Bot::Object::Chat ();
use Teapot::Bot::Object::User (); use Teapot::Bot::Object::MessageReaction ();
$Teapot::Bot::Object::MessageReactionUpdated::VERSION = '0.026'; $Teapot::Bot::Object::MessageReactionUpdated::VERSION = '0.026';