diff options
Diffstat (limited to 'src/tg-types/chat.lisp')
| -rw-r--r-- | src/tg-types/chat.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/tg-types/chat.lisp b/src/tg-types/chat.lisp index 3ad42ef..d4af5a1 100644 --- a/src/tg-types/chat.lisp +++ b/src/tg-types/chat.lisp | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | 1 | ;; SPDX-License-Identifier: EUPL-1.2 |
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> |
| 3 | (defpackage :ukkoclot/tg-types/chat | 3 | (defpackage :ukkoclot/tg-types/chat |
| 4 | (:use :c2cl :ukkoclot/tg-types/macros) | 4 | (:use :c2cl :ukkoclot/tg-types/chat-type :ukkoclot/tg-types/macros) |
| 5 | (:export | 5 | (:export |
| 6 | #:chat | 6 | #:chat |
| 7 | #:make-chat | 7 | #:make-chat |
| @@ -19,7 +19,7 @@ | |||
| 19 | 19 | ||
| 20 | (define-tg-type chat | 20 | (define-tg-type chat |
| 21 | (id integer) | 21 | (id integer) |
| 22 | (type string nil) ;TODO: member of keywords | 22 | (type chat-type) |
| 23 | (title (or string null) nil) | 23 | (title (or string null) nil) |
| 24 | (username (or string null) nil) | 24 | (username (or string null) nil) |
| 25 | (first-name (or string null) nil) | 25 | (first-name (or string null) nil) |