summaryrefslogtreecommitdiff
path: root/src/tg/message-entity-type.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/tg/message-entity-type.lisp')
-rw-r--r--src/tg/message-entity-type.lisp47
1 files changed, 47 insertions, 0 deletions
diff --git a/src/tg/message-entity-type.lisp b/src/tg/message-entity-type.lisp
new file mode 100644
index 0000000..f904509
--- /dev/null
+++ b/src/tg/message-entity-type.lisp
@@ -0,0 +1,47 @@
1;; SPDX-License-Identifier: EUPL-1.2
2;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
3(defpackage :ukkoclot/tg/message-entity-type
4 (:use :c2cl :ukkoclot/enum)
5 (:export
6 :message-entity-type
7 :mention
8 :hashtag
9 :cashtag
10 :bot-command
11 :url-entity
12 :email
13 :phone-number
14 :bold
15 :italic
16 :underline
17 :strikethrough
18 :spoiler
19 :blockquote
20 :expandable-blockquote
21 :code
22 :pre
23 :text-link
24 :text-mention
25 :custom-emoji))
26(in-package :ukkoclot/tg/message-entity-type)
27
28(define-enum message-entity-type
29 (mention "mention")
30 (hashtag "hashtag")
31 (cashtag "cashtag")
32 (bot-command "bot_command")
33 (url-entity "url")
34 (email "email")
35 (phone-number "phone_number")
36 (bold "bold")
37 (italic "italic")
38 (underline "underline")
39 (strikethrough "strikethrough")
40 (spoiler "spoiler")
41 (blockquote "blockquote")
42 (expandable-blockquote "expandable_blockquote")
43 (code "code")
44 (pre "pre")
45 (text-link "text_link")
46 (text-mention "text_mention")
47 (custom-emoji "custom_emoji"))