1 files changed, 11 insertions, 4 deletions

diff --git a/src/tg/keyboard-button-poll-type.lisp b/src/tg/keyboard-button-poll-type.lisp
index da74da5..6ab91ea 100644
--- a/src/tg/keyboard-button-poll-type.lisp
+++ b/src/tg/keyboard-button-poll-type.lisp
@@ -1,14 +1,21 @@
 ;; SPDX-License-Identifier: EUPL-1.2
 ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
 (defpackage :ukkoclot/src/tg/keyboard-button-poll-type
-  (:use :c2cl :ukkoclot/src/tg/type-macros)
+  (:documentation "KeyboardButtonPollType Telegram type")
+  (:use :c2cl :ukkoclot/src/enum :ukkoclot/src/tg/type-macros)
   (:export
+   #:keyboard-button-poll-type-type
+   #:quiz
+   #:regular
    #:keyboard-button-poll-type
    #:make-keyboard-button-poll-type
    #:keyboard-button-poll-type-p
-   #:copy-keyboard-button-poll-type
-   #:keyboard-button-poll-type-type))
+   #:copy-keyboard-button-poll-type))
 (in-package :ukkoclot/src/tg/keyboard-button-poll-type)
 
+(define-enum keyboard-button-poll-type-type
+  (quiz "quiz")
+  (regular "regular"))
+
 (define-tg-type keyboard-button-poll-type
-  (type (or string null) nil))          ;(member "quiz" "regular") or null
+  (type (or keyboard-button-poll-type-type null) nil))