summaryrefslogtreecommitdiff
path: root/src/main.lisp
diff options
context:
space:
mode:
authorGravatar Uko Kokņevičs2025-10-12 22:42:41 +0300
committerGravatar Uko Kokņevičs2025-10-12 22:42:41 +0300
commit542f074a6929ec12b8b42e4cf16ff74523e04602 (patch)
tree938b88157954a873fc602f682514b0ba7ea104af /src/main.lisp
parentFix enum jsonification (diff)
downloadukkoclot-542f074a6929ec12b8b42e4cf16ff74523e04602.tar.gz
ukkoclot-542f074a6929ec12b8b42e4cf16ff74523e04602.tar.xz
ukkoclot-542f074a6929ec12b8b42e4cf16ff74523e04602.zip
Add message-entity-type enum
Diffstat (limited to 'src/main.lisp')
-rw-r--r--src/main.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/main.lisp b/src/main.lisp
index 4db0425..f31cd7c 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -133,7 +133,7 @@
133 133
134 (awhen (message-entities msg) 134 (awhen (message-entities msg)
135 (loop for entity across it 135 (loop for entity across it
136 when (and (equal (message-entity-type entity) "bot_command") 136 when (and (equal (message-entity-type entity) bot-command)
137 (= (message-entity-offset entity) 0)) 137 (= (message-entity-offset entity) 0))
138 do (on-text-command bot msg text (message-entity-extract entity text)))) 138 do (on-text-command bot msg text (message-entity-extract entity text))))
139 139