1 files changed, 14 insertions, 16 deletions

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 <perkontevs@gmail.com>
 (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)