From 542f074a6929ec12b8b42e4cf16ff74523e04602 Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Sun, 12 Oct 2025 22:42:41 +0300
Subject: Add message-entity-type enum

---
 src/tg-types/message-entity-type.lisp | 47 +++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)
 create mode 100644 src/tg-types/message-entity-type.lisp

(limited to 'src/tg-types/message-entity-type.lisp')

diff --git a/src/tg-types/message-entity-type.lisp b/src/tg-types/message-entity-type.lisp
new file mode 100644
index 0000000..f34c44a
--- /dev/null
+++ b/src/tg-types/message-entity-type.lisp
@@ -0,0 +1,47 @@
+;; SPDX-License-Identifier: EUPL-1.2
+;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
+(defpackage :ukkoclot/tg-types/message-entity-type
+  (:use :c2cl :ukkoclot/enum)
+  (:export
+   :message-entity-type
+   :mention
+   :hashtag
+   :cashtag
+   :bot-command
+   :url-entity
+   :email
+   :phone-number
+   :bold
+   :italic
+   :underline
+   :strikethrough
+   :spoiler
+   :blockquote
+   :expandable-blockquote
+   :code
+   :pre
+   :text-link
+   :text-mention
+   :custom-emoji))
+(in-package :ukkoclot/tg-types/message-entity-type)
+
+(define-enum message-entity-type
+  (mention "mention")
+  (hashtag "hashtag")
+  (cashtag "cashtag")
+  (bot-command "bot_command")
+  (url-entity "url")
+  (email "email")
+  (phone-number "phone_number")
+  (bold "bold")
+  (italic "italic")
+  (underline "underline")
+  (strikethrough "strikethrough")
+  (spoiler "spoiler")
+  (blockquote "blockquote")
+  (expandable-blockquote "expandable_blockquote")
+  (code "code")
+  (pre "pre")
+  (text-link "text_link")
+  (text-mention "text_mention")
+  (custom-emoji "custom_emoji"))
-- 
cgit v1.2.3