3 use RT::Test tests => 9;
5 my $user_a = RT::Test->load_or_create_user(
7 Password => 'password',
10 ok( $user_a && $user_a->id, 'created user_a' );
15 Right => [qw/SeeQueue CreateTicket ShowTicket OwnTicket/]
18 'add basic rights for user_a'
21 my $ticket = RT::Test->create_ticket(
22 Subject => 'test reminder permission',
25 ok( $ticket->id, 'created a ticket' );
26 $ticket->CurrentUser($user_a);
28 my ( $status, $msg ) = $ticket->Reminders->Add(
29 Subject => 'user a reminder',
32 ok( !$status, "couldn't create reminders without ModifyTicket: $msg" );
38 Right => [qw/ModifyTicket/]
41 'add ModifyTicket right for user_a'
44 ( $status, $msg ) = $ticket->Reminders->Add(
45 Subject => 'user a reminder',
48 ok( $status, "created a reminder with ModifyTicket: $msg" );