From fd245cd23ce79af85adc814b91a91902912e6de0 Mon Sep 17 00:00:00 2001 From: Uko Kokņevičs Date: Sun, 12 Oct 2025 23:55:11 +0300 Subject: Some more TG types --- src/tg-types/update.lisp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'src/tg-types/update.lisp') diff --git a/src/tg-types/update.lisp b/src/tg-types/update.lisp index bc08984..be4cb32 100644 --- a/src/tg-types/update.lisp +++ b/src/tg-types/update.lisp @@ -6,7 +6,8 @@ :ukkoclot/tg-types/macros :ukkoclot/tg-types/business-connection :ukkoclot/tg-types/callback-query - :ukkoclot/tg-types/message) + :ukkoclot/tg-types/message + :ukkoclot/tg-types/message-reaction-updated) (:export #:update #:make-update @@ -20,6 +21,7 @@ #:update-business-connection #:update-business-message #:update-edited-business-message + #:update-message-reaction #:update-callback-query)) (in-package :ukkoclot/tg-types/update) @@ -33,7 +35,7 @@ (business-message (or message null) nil) (edited-business-message (or message null) nil) ;; (deleted-business-messages (or business-messages-deleted null) nil) - ;; (message-reaction (or message-reaction-updated null) nil) + (message-reaction (or message-reaction-updated null) nil) ;; (message-reaction-count (or message-reaction-count-updated null) nil) ;; (inline-query (or inline-query null) nil) ;; (chosen-inline-result (or chosen-inline-result null) nil) -- cgit v1.2.3