summaryrefslogtreecommitdiff
path: root/src/tg-types/update.lisp
diff options
context:
space:
mode:
authorGravatar Uko Kokņevičs2025-10-12 23:35:11 +0300
committerGravatar Uko Kokņevičs2025-10-12 23:35:11 +0300
commit4e23b8a01ce387dc6533d6b14d64ae5ccc86f584 (patch)
tree2707a6fbea7260246026f7f4cfdd0267dca439c4 /src/tg-types/update.lisp
parentReplace my simple logging implementation with log4cl (diff)
downloadukkoclot-4e23b8a01ce387dc6533d6b14d64ae5ccc86f584.tar.gz
ukkoclot-4e23b8a01ce387dc6533d6b14d64ae5ccc86f584.tar.xz
ukkoclot-4e23b8a01ce387dc6533d6b14d64ae5ccc86f584.zip
Added BusinessBotRights and BusinessConnection
Diffstat (limited to 'src/tg-types/update.lisp')
-rw-r--r--src/tg-types/update.lisp8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/tg-types/update.lisp b/src/tg-types/update.lisp
index c259553..bc08984 100644
--- a/src/tg-types/update.lisp
+++ b/src/tg-types/update.lisp
@@ -1,7 +1,10 @@
1;; SPDX-License-Identifier: EUPL-1.2 1;; SPDX-License-Identifier: EUPL-1.2
2;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> 2;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
3(defpackage :ukkoclot/tg-types/update 3(defpackage :ukkoclot/tg-types/update
4 (:use :c2cl :ukkoclot/tg-types/macros 4 (:use
5 :c2cl
6 :ukkoclot/tg-types/macros
7 :ukkoclot/tg-types/business-connection
5 :ukkoclot/tg-types/callback-query 8 :ukkoclot/tg-types/callback-query
6 :ukkoclot/tg-types/message) 9 :ukkoclot/tg-types/message)
7 (:export 10 (:export
@@ -14,6 +17,7 @@
14 #:update-edited-message 17 #:update-edited-message
15 #:update-channel-post 18 #:update-channel-post
16 #:update-edited-channel-post 19 #:update-edited-channel-post
20 #:update-business-connection
17 #:update-business-message 21 #:update-business-message
18 #:update-edited-business-message 22 #:update-edited-business-message
19 #:update-callback-query)) 23 #:update-callback-query))
@@ -25,7 +29,7 @@
25 (edited-message (or message null) nil) 29 (edited-message (or message null) nil)
26 (channel-post (or message null) nil) 30 (channel-post (or message null) nil)
27 (edited-channel-post (or message null) nil) 31 (edited-channel-post (or message null) nil)
28 ;; (business-connection (or business-connection null) nil) 32 (business-connection (or business-connection null) nil)
29 (business-message (or message null) nil) 33 (business-message (or message null) nil)
30 (edited-business-message (or message null) nil) 34 (edited-business-message (or message null) nil)
31 ;; (deleted-business-messages (or business-messages-deleted null) nil) 35 ;; (deleted-business-messages (or business-messages-deleted null) nil)