summaryrefslogtreecommitdiff
path: root/src/tg/force-reply.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/tg/force-reply.lisp')
-rw-r--r--src/tg/force-reply.lisp18
1 files changed, 18 insertions, 0 deletions
diff --git a/src/tg/force-reply.lisp b/src/tg/force-reply.lisp
new file mode 100644
index 0000000..816eb75
--- /dev/null
+++ b/src/tg/force-reply.lisp
@@ -0,0 +1,18 @@
1;; SPDX-License-Identifier: EUPL-1.2
2;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
3(defpackage :ukkoclot/tg/force-reply
4 (:use :c2cl :ukkoclot/tg/macros)
5 (:export
6 #:force-reply
7 #:make-force-reply
8 #:force-reply-p
9 #:copy-force-reply
10 #:force-reply-force-reply
11 #:force-reply-input-field-placeholder
12 #:force-reply-selective))
13(in-package :ukkoclot/tg/force-reply)
14
15(define-tg-type force-reply
16 (force-reply boolean t :skip-if-default nil)
17 (input-field-placeholder (or string null) nil)
18 (selective boolean nil))