From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

#!perl
# vim:ft=perl:
use strict;
use Test::More tests => 11;
use constant METHODS => (
'new', 'to_form', 'from_form',
'rt_type', 'id',
# attributes:
'name', 'description', 'members'
);
BEGIN {
use_ok('RT::Client::REST::Group');
}
my $user;
lives_ok {
$user = RT::Client::REST::Group->new;
}
'User can get successfully created';
for my $method (METHODS) {
can_ok( $user, $method );
}
ok( 'group' eq $user->rt_type, 'rt_type is ok' );