1 files changed, 25 insertions, 0 deletions

diff --git a/src/tg/edit-message-text.lisp b/src/tg/edit-message-text.lisp
new file mode 100644
index 0000000..a7db3a8
--- /dev/null
+++ b/src/tg/edit-message-text.lisp
@@ -0,0 +1,25 @@
+;; SPDX-License-Identifier: EUPL-1.2
+;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
+(defpackage :ukkoclot/tg/edit-message-text
+  (:use
+   :c2cl
+   :ukkoclot/tg/inline-keyboard-markup
+   :ukkoclot/tg/link-preview-options
+   :ukkoclot/tg/message
+   :ukkoclot/tg/message-entity
+   :ukkoclot/bot/method-macros
+   :ukkoclot/tg/parse-mode)
+  (:export :edit-message-text))
+(in-package :ukkoclot/tg/edit-message-text)
+
+;; TODO: Add a way to simply specify :message msg :)
+(define-tg-method (edit-message-text message)
+  (business-connection-id (or string null) nil)
+  (chat-id (or integer string null) nil)
+  (message-id (or integer null) nil)
+  (inline-message-id (or string null) nil)
+  (text string)
+  (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))