summaryrefslogtreecommitdiff
path: root/src/tg-types/reply-parameters.lisp
diff options
context:
space:
mode:
authorGravatar Uko Kokņevičs2025-10-10 12:30:46 +0300
committerGravatar Uko Kokņevičs2025-10-10 12:30:46 +0300
commitb4c1f66e1631f40d8a7d0f80523470677a91381f (patch)
treeef3aa478cfca05dc27e0777f9c42813d4268e54a /src/tg-types/reply-parameters.lisp
parentAdd a helper reply-message function (diff)
downloadukkoclot-b4c1f66e1631f40d8a7d0f80523470677a91381f.tar.gz
ukkoclot-b4c1f66e1631f40d8a7d0f80523470677a91381f.tar.xz
ukkoclot-b4c1f66e1631f40d8a7d0f80523470677a91381f.zip
Bunch of changes
- Animations - Rewrite of serialization deserialization - Bunch of new TG types
Diffstat (limited to 'src/tg-types/reply-parameters.lisp')
-rw-r--r--src/tg-types/reply-parameters.lisp27
1 files changed, 12 insertions, 15 deletions
diff --git a/src/tg-types/reply-parameters.lisp b/src/tg-types/reply-parameters.lisp
index 29d21f7..ac38db7 100644
--- a/src/tg-types/reply-parameters.lisp
+++ b/src/tg-types/reply-parameters.lisp
@@ -3,21 +3,18 @@
3(defpackage :ukkoclot/tg-types/reply-parameters 3(defpackage :ukkoclot/tg-types/reply-parameters
4 (:use :c2cl :ukkoclot/tg-types/macros :ukkoclot/tg-types/message-entity) 4 (:use :c2cl :ukkoclot/tg-types/macros :ukkoclot/tg-types/message-entity)
5 (:export 5 (:export
6 reply-parameters 6 #:reply-parameters
7 make-reply-parameters 7 #:make-reply-parameters
8 reply-parameters-p 8 #:reply-parameters-p
9 copy-reply-parameters 9 #:copy-reply-parameters
10 reply-parameters-message-id 10 #:reply-parameters-message-id
11 reply-parameters-chat-id 11 #:reply-parameters-chat-id
12 reply-parameters-allow-sending-without-reply 12 #:reply-parameters-allow-sending-without-reply
13 reply-parameters-quote 13 #:reply-parameters-quote
14 reply-parameters-quote-parse-mode 14 #:reply-parameters-quote-parse-mode
15 reply-parameters-quote-entities 15 #:reply-parameters-quote-entities
16 reply-parameters-quote-position 16 #:reply-parameters-quote-position
17 reply-parameters-checklist-task-id 17 #:reply-parameters-checklist-task-id))
18
19 hash->reply-parameters
20 parse-reply-parameters-array))
21(in-package :ukkoclot/tg-types/reply-parameters) 18(in-package :ukkoclot/tg-types/reply-parameters)
22 19
23(define-tg-type reply-parameters 20(define-tg-type reply-parameters