File Coverage

blib/lib/Telegram/Bot/Object/ChatJoinRequest.pm

Criterion	Covered	Total	%
statement	15	22	68.1
branch			n/a
condition			n/a
subroutine	5	9	55.5
pod	1	4	25.0
total	21	35	60.0

package Telegram::Bot::Object::ChatJoinRequest;
$Telegram::Bot::Object::ChatJoinRequest::VERSION = '0.029';
# ABSTRACT: The base class for the Telegram type "ChatJoinRequest".


use Mojo::Base 'Telegram::Bot::Object::Base';

use Telegram::Bot::Object::User;
use Telegram::Bot::Object::Chat;
use Telegram::Bot::Object::ChatInviteLink;

use Data::Dumper;

# basic message stuff
has 'chat'; # Chat
has 'from'; # User

has 'user_chat_id'; # Integer
has 'date';  # Integer
has 'bio'; # String
has 'invite_link'; # ChatInviteLink

sub fields {
  return {
          'scalar'                                      => [qw/user_chat_id date bio/],
          'Telegram::Bot::Object::User'                 => [qw/from/],

          'Telegram::Bot::Object::Chat'                 => [qw/chat/],

          'Telegram::Bot::Object::ChatInviteLink'       => [qw/invite_link/],
  };
}

sub arrays {
}


sub approve {
  my $self = shift;
  my $text = shift;
  return $self->_brain->approveChatJoinRequest({chat_id => $self->chat->id, user_id => $self->from->id});
}

sub decline {
  my $self = shift;
  my $text = shift;
  return $self->_brain->declineChatJoinRequest({chat_id => $self->chat->id, user_id => $self->from->id});
}

1;

__END__