diff options
| author |  Uko Kokņevičs | 2025-10-12 22:14:39 +0300 |
|---|---|---|
| committer | Uko Kokņevičs | 2025-10-12 22:14:39 +0300 |
| commit | 31a972d6825114b1a971e42cdc86e1bd7a9834c3 (patch) | |
| tree | b40ff73cc76ff88d969b9e12325fd4b17e68dadc /src/tg-types/parse-mode.lisp | |
| parent | msginfo: pretty print the response (diff) | |
| download | ukkoclot-31a972d6825114b1a971e42cdc86e1bd7a9834c3.tar.gz ukkoclot-31a972d6825114b1a971e42cdc86e1bd7a9834c3.tar.xz ukkoclot-31a972d6825114b1a971e42cdc86e1bd7a9834c3.zip | |
Introduce enums and a pretty parse-mode type
Diffstat (limited to 'src/tg-types/parse-mode.lisp')
| -rw-r--r-- | src/tg-types/parse-mode.lisp | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/tg-types/parse-mode.lisp b/src/tg-types/parse-mode.lisp new file mode 100644 index 0000000..80c24aa --- /dev/null +++ b/src/tg-types/parse-mode.lisp | |||
| @@ -0,0 +1,11 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | ||
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | ||
| 3 | (defpackage :ukkoclot/tg-types/parse-mode | ||
| 4 | (:use :c2cl :ukkoclot/enum) | ||
| 5 | (:export :html :markdown-legacy :markdown :parse-mode)) | ||
| 6 | (in-package :ukkoclot/tg-types/parse-mode) | ||
| 7 | |||
| 8 | (define-enum parse-mode | ||
| 9 | (markdown-legacy "Markdown") | ||
| 10 | (markdown "MarkdownV2") | ||
| 11 | (html "HTML")) | ||