From b4c1f66e1631f40d8a7d0f80523470677a91381f Mon Sep 17 00:00:00 2001 From: Uko Kokņevičs Date: Fri, 10 Oct 2025 12:30:46 +0300 Subject: Bunch of changes - Animations - Rewrite of serialization deserialization - Bunch of new TG types --- src/tg-types/message-entity.lisp | 30 ++++++++++++++---------------- 1 file changed, 14 insertions(+), 16 deletions(-) (limited to 'src/tg-types/message-entity.lisp') diff --git a/src/tg-types/message-entity.lisp b/src/tg-types/message-entity.lisp index fcabcce..a605f23 100644 --- a/src/tg-types/message-entity.lisp +++ b/src/tg-types/message-entity.lisp @@ -1,27 +1,25 @@ ;; SPDX-License-Identifier: EUPL-1.2 ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs (defpackage :ukkoclot/tg-types/message-entity - (:use :c2cl :iterate :ukkoclot/tg-types/macros :ukkoclot/tg-types/parsers :ukkoclot/tg-types/user) + (:use :c2cl :iterate :ukkoclot/tg-types/macros :ukkoclot/tg-types/user) (:export - message-entity - make-message-entity - message-entity-p - copy-message-entity - message-entity-type - message-entity-offset - message-entity-length - message-entity-url - message-entity-user - message-entity-language - message-entity-custom-emoji-id + #:message-entity + #:make-message-entity + #:message-entity-p + #:copy-message-entity + #:message-entity-type + #:message-entity-offset + #:message-entity-length + #:message-entity-url + #:message-entity-user + #:message-entity-language + #:message-entity-custom-emoji-id - hash->message-entity - message-entity-extract - parse-message-entity-array)) + #:message-entity-extract)) (in-package :ukkoclot/tg-types/message-entity) (define-tg-type message-entity - (type keyword nil :parser tg-string->keyword) + (type string nil) ;TODO: keywords (offset integer) (length integer) (url (or string null) nil) -- cgit v1.2.3