From 31a972d6825114b1a971e42cdc86e1bd7a9834c3 Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Sun, 12 Oct 2025 22:14:39 +0300
Subject: Introduce enums and a pretty parse-mode type

---
 src/bot/methods.lisp | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'src/bot/methods.lisp')

diff --git a/src/bot/methods.lisp b/src/bot/methods.lisp
index 7ccc4ad..984646a 100644
--- a/src/bot/methods.lisp
+++ b/src/bot/methods.lisp
@@ -23,7 +23,7 @@
   (message-id (or integer null) nil)
   (inline-message-id (or string null) nil)
   (text string)
-  (parse-mode (or string null) nil)
+  (parse-mode (or parse-mode null) nil)
   (entities (or (array message-entity) null) nil)
   (link-preview-options (or link-preview-options null) nil)
   (reply-markup (or inline-keyboard-markup null) nil))
@@ -56,7 +56,7 @@
   (height (or integer null) nil)
   (thumbnail (or pathname string null) nil)
   (caption (or string null) nil)
-  (parse-mode (or string null) nil)
+  (parse-mode (or parse-mode null) nil)
   (caption-entities (or (array message-entity) null) nil)
   (show-caption-above-media boolean nil)
   (has-spoiler boolean nil)
@@ -73,8 +73,7 @@
   (chat-id (or integer string))
   (message-thread-id (or integer null) nil)
   (text string)
-  ;; TODO: parse-mode should maybe be keywords?
-  (parse-mode (or string null) nil)
+  (parse-mode (or parse-mode null) nil)
   (entities (or (array message-entity) null) nil)
   (link-preview-options (or link-preview-options null) nil)
   (disable-notification (or boolean null) nil)
-- 
cgit v1.2.3