use strict;
use warnings;
-use RT::Test tests => 28;
+use RT::Test tests => 47;
my ( $url, $m ) = RT::Test->started_ok;
ok( $m->login, 'logged in' );
my ( @link_tickets, @search_tickets );
for ( 1 .. 3 ) {
- my $link_ticket = RT::Ticket->new($RT::SystemUser);
+ my $link_ticket = RT::Ticket->new(RT->SystemUser);
my ( $ret, $msg ) = $link_ticket->Create(
Subject => "link ticket $_",
Queue => 'general',
}
for ( 1 .. 3 ) {
- my $ticket = RT::Ticket->new($RT::SystemUser);
+ my $ticket = RT::Ticket->new(RT->SystemUser);
my ( $ret, $msg ) = $ticket->Create(
Subject => "search ticket $_",
Queue => 'general',
$m->content_contains( 'Current Links', 'has current links part' );
$m->content_lacks( 'DeleteLink--', 'no delete link stuff' );
$m->submit_form(
- form_number => 3,
+ form_name => 'BulkUpdate',
fields => {
'Ticket-DependsOn' => $link_tickets[0],
'Ticket-MemberOf' => $link_tickets[1],
$m->content_contains( 'Current Links', 'has current links part' );
$m->content_lacks( 'DeleteLink--', 'no delete link stuff' );
+$m->form_name('BulkUpdate');
+my @fields = qw/Owner AddRequestor DeleteRequestor AddCc DeleteCc AddAdminCc
+DeleteAdminCc Subject Priority Queue Status Starts_Date Told_Date Due_Date
+Resolved_Date UpdateSubject UpdateContent/;
+for my $field ( @fields ) {
+ is( $m->value($field), '', "default $field is empty" );
+}
+
# test DependsOn, MemberOf and RefersTo
$m->submit_form(
- form_number => 3,
+ form_name => 'BulkUpdate',
fields => {
'Ticket-DependsOn' => $link_tickets[0],
'Ticket-MemberOf' => $link_tickets[1],
'found refers to link' );
$m->submit_form(
- form_number => 3,
+ form_name => 'BulkUpdate',
fields => {
"DeleteLink--DependsOn-fsck.com-rt://$rtname/ticket/$link_tickets[0]" =>
1,
# test DependedOnBy, Members and ReferredToBy
$m->submit_form(
- form_number => 3,
+ form_name => 'BulkUpdate',
fields => {
'DependsOn-Ticket' => $link_tickets[0],
'MemberOf-Ticket' => $link_tickets[1],
'found referrd to link' );
$m->submit_form(
- form_number => 3,
+ form_name => 'BulkUpdate',
fields => {
"DeleteLink-fsck.com-rt://$rtname/ticket/$link_tickets[0]-DependsOn-" =>
1,