diff options
| author | 2025-10-13 06:32:57 +0300 | |
|---|---|---|
| committer | 2025-10-13 06:32:57 +0300 | |
| commit | 9e424b351da370630924e32d0a84eba6fdb8c05e (patch) | |
| tree | 60999a1b91e73c8aa74e43085e3c0be39d5ec8cf /src/tg/delete-message.lisp | |
| parent | Improve define-tg-method (diff) | |
| download | ukkoclot-9e424b351da370630924e32d0a84eba6fdb8c05e.tar.gz ukkoclot-9e424b351da370630924e32d0a84eba6fdb8c05e.tar.xz ukkoclot-9e424b351da370630924e32d0a84eba6fdb8c05e.zip | |
Move bot/methods to tg/*
Diffstat (limited to 'src/tg/delete-message.lisp')
| -rw-r--r-- | src/tg/delete-message.lisp | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/tg/delete-message.lisp b/src/tg/delete-message.lisp new file mode 100644 index 0000000..3e79de7 --- /dev/null +++ b/src/tg/delete-message.lisp | |||
| @@ -0,0 +1,10 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | ||
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | ||
| 3 | (defpackage :ukkoclot/tg/delete-message | ||
| 4 | (:use :c2cl :ukkoclot/bot/method-macros) | ||
| 5 | (:export :delete-message)) | ||
| 6 | (in-package :ukkoclot/tg/delete-message) | ||
| 7 | |||
| 8 | (define-tg-method (delete-message boolean) | ||
| 9 | (chat-id (or integer string)) | ||
| 10 | (message-id integer)) | ||