From c5191f10359f32a3af44f4087322348602734a3c Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Sun, 26 Apr 2020 11:49:06 +0200
Subject: Support photos in tgserver

---
 tgserver | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'tgserver')

diff --git a/tgserver b/tgserver
index 4de8fdb..73c68ac 100755
--- a/tgserver
+++ b/tgserver
@@ -114,7 +114,13 @@ sub reply {
     if ($type eq 'DOCUMENT') {
         my $caption = $response->{'caption'};
         $logger->info("🤖: [Document '$caption'] -> $chat_id\n");
-        $api->send_document($chat_id, decode_base64 $response->{'content'}, $caption);
+        $api->send_document($chat_id, decode_base64 $response->{'content'},
+                           $response->{'filename'}, $caption);
+    } elsif ($type eq 'PHOTO') {
+        my $caption = $response->{'caption'};
+        $logger->info("🤖: [Photo '$caption'] -> $chat_id\n");
+        $api->send_photo($chat_id, decode_base64 $response->{'content'},
+                        $response->{'filename'}, $caption);
     } elsif ($type eq 'TEXT' and $response) {
         $logger->info("🤖: '$response' -> $chat_id\n");
         $api->send_message($chat_id, $response);
-- 
cgit v1.2.3