From 4da3ad1f569832845b58c3ce35149633a2bb665c Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Thu, 9 Oct 2025 21:58:43 +0300
Subject: Initial commit

---
 src/tg-types/force-reply.lisp | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 src/tg-types/force-reply.lisp

(limited to 'src/tg-types/force-reply.lisp')

diff --git a/src/tg-types/force-reply.lisp b/src/tg-types/force-reply.lisp
new file mode 100644
index 0000000..ad9d2a0
--- /dev/null
+++ b/src/tg-types/force-reply.lisp
@@ -0,0 +1,21 @@
+;; SPDX-License-Identifier: EUPL-1.2
+;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
+(defpackage :ukkoclot/tg-types/force-reply
+  (:use :c2cl :ukkoclot/tg-types/macros)
+  (:export
+   force-reply
+   make-force-reply
+   force-reply-p
+   copy-force-reply
+   force-reply-force-reply
+   force-reply-input-field-placeholder
+   force-reply-selective
+
+   hash->force-reply
+   parse-force-reply-array))
+(in-package :ukkoclot/tg-types/force-reply)
+
+(define-tg-type force-reply
+  (force-reply boolean t :skip-if-default nil)
+  (input-field-placeholder (or string null) nil)
+  (selective boolean nil))
-- 
cgit v1.2.3