blob: 3d1ff3f6bc8b56ebd69e6b1962e7011b399d02c5 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
;; SPDX-License-Identifier: EUPL-1.2
;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
(defpackage :ukkoclot/src/tg/link-preview-options
(:use :c2cl :ukkoclot/src/tg/type-macros)
(:export
#:link-preview-options
#:make-link-preview-options
#:link-preview-options-p
#:copy-link-preview-options
#:link-preview-options-is-disabled
#:link-preview-options-url
#:link-preview-options-prefer-small-media
#:link-preview-options-prefer-large-media
#:link-preview-options-show-above-text))
(in-package :ukkoclot/src/tg/link-preview-options)
(define-tg-type link-preview-options
(is-disabled boolean nil)
(url (or string null) nil)
(prefer-small-media boolean nil)
(prefer-large-media boolean nil)
(show-above-text boolean nil))
|
