diff --git a/lib/Teapot/Bot/Object/Dice.pm b/lib/Teapot/Bot/Object/Dice.pm new file mode 100644 index 0000000..43fd4b3 --- /dev/null +++ b/lib/Teapot/Bot/Object/Dice.pm @@ -0,0 +1,48 @@ +package Teapot::Bot::Object::Dice; +# ABSTRACT: The base class for Telegram message 'Dice' type. + +use Mojo::Base 'Teapot::Bot::Object::Base'; + +$Teapot::Bot::Object::Dice::VERSION = '0.022'; + +has 'emoji'; +has 'value'; + +sub fields { + return { scalar => [qw/emoji value/] }; +} + +1; + +__END__ + +=pod + +=encoding UTF-8 + +=head1 NAME + +Teapot::Bot::Object::Dice - The base class for Telegram message 'Dice' type + +=head1 VERSION + +version 0.022 + +=head1 DESCRIPTION +The base class for Telegram message 'Dice' type. + +See L for details of the +attributes available for L objects. + +=head1 AUTHOR + +Sergei Fedosov + +=head1 LICENSE AND COPYRIGHT + +This software is copyright (c) 2019 by Sergei Fedosov . + +This is free software; you can redistribute it and/or modify it under +the same terms as the Perl 5 programming language system itself. + +=cut