1 files changed, 4 insertions, 3 deletions

diff --git a/src/tg/send-message.lisp b/src/tg/send-message.lisp
index 9edc50d..befecbe 100644
--- a/src/tg/send-message.lisp
+++ b/src/tg/send-message.lisp
@@ -1,6 +1,7 @@
 ;; SPDX-License-Identifier: EUPL-1.2
 ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
 (defpackage :ukkoclot/src/tg/send-message
+  (:documentation "sendMessage Telegram method")
   (:use
    :c2cl
    :ukkoclot/src/tg/force-reply
@@ -30,9 +31,9 @@
   (reply-parameters (or reply-parameters null) nil)
   (reply-markup (or inline-keyboard-markup reply-keyboard-markup reply-keyboard-remove force-reply null) nil))
 
-(defun reply-message (bot msg text &key parse-mode allow-sending-without-reply)
-  (send-message bot
-                :chat-id (message-chat-id msg)
+(defun reply-message (msg text &key parse-mode allow-sending-without-reply)
+  "Shortcut to reply to a given MSG."
+  (send-message :chat-id (message-chat-id msg)
                 :text text
                 :parse-mode parse-mode
                 :reply-parameters