aboutsummaryrefslogtreecommitdiff
path: root/tgserver
diff options
context:
space:
mode:
Diffstat (limited to 'tgserver')
-rwxr-xr-xtgserver22
1 files changed, 14 insertions, 8 deletions
diff --git a/tgserver b/tgserver
index b281e40..8a12300 100755
--- a/tgserver
+++ b/tgserver
@@ -61,14 +61,20 @@ while (1) {
$cache->offset($update->{'update_id'}+1);
$logger->debug(sprintf "Update %s", Dumper($update));
- my $msg = $update->{'message'};
- $ENV{'TGUTILS_CHAT_ID'} = $msg->{'chat'}{'id'};
- $ENV{'TGUTILS_FROM_ID'} = $msg->{'from'}{'id'};
- $ENV{'TGUTILS_FROM_USERNAME'} = $msg->{'from'}{'username'};
- if (exists $msg->{'photo'}) {
- handle_photo($msg);
- } else {
- handle_text($msg);
+ if ($update->{'message'}) {
+ my $msg = $update->{'message'};
+ $ENV{'TGUTILS_CHAT_ID'} = $msg->{'chat'}{'id'};
+ $ENV{'TGUTILS_FROM_ID'} = $msg->{'from'}{'id'};
+ $ENV{'TGUTILS_FROM_USERNAME'} = $msg->{'from'}{'username'};
+ if (exists $msg->{'photo'}) {
+ handle_photo($msg);
+ } else {
+ handle_text($msg);
+ }
+ } elsif ($update->{'edited_message'}) {
+ my $msg = $update->{'edited_message'};
+ # TODO
+ $logger->info("Received edited message, ignoring...");
}
}
}