summaryrefslogtreecommitdiff
path: root/src/tg/callback-query.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/tg/callback-query.lisp')
-rw-r--r--src/tg/callback-query.lisp29
1 files changed, 29 insertions, 0 deletions
diff --git a/src/tg/callback-query.lisp b/src/tg/callback-query.lisp
new file mode 100644
index 0000000..6b89755
--- /dev/null
+++ b/src/tg/callback-query.lisp
@@ -0,0 +1,29 @@
1;; SPDX-License-Identifier: EUPL-1.2
2;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
3(defpackage :ukkoclot/tg/callback-query
4 (:use :c2cl :ukkoclot/tg/macros)
5 (:use
6 :ukkoclot/tg/message
7 :ukkoclot/tg/user)
8 (:export
9 #:callback-query
10 #:make-callback-query
11 #:callback-query-p
12 #:copy-callback-query
13 #:callback-query-id
14 #:callback-query-from
15 #:callback-query-message
16 #:callback-query-inline-message-id
17 #:callback-query-chat-instance
18 #:callback-query-data
19 #:callback-query-game-short-name))
20(in-package :ukkoclot/tg/callback-query)
21
22(define-tg-type callback-query
23 (id string)
24 (from user)
25 (message (or message null) nil)
26 (inline-message-id (or string null) nil)
27 (chat-instance string)
28 (data (or string null) nil)
29 (game-short-name (or string null) nil))