summaryrefslogtreecommitdiff
path: root/rt/t/ticket/merge.t
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/ticket/merge.t')
-rw-r--r--rt/t/ticket/merge.t12
1 files changed, 6 insertions, 6 deletions
diff --git a/rt/t/ticket/merge.t b/rt/t/ticket/merge.t
index 7c72fe08f..d06d54174 100644
--- a/rt/t/ticket/merge.t
+++ b/rt/t/ticket/merge.t
@@ -11,11 +11,11 @@ use RT::Test tests => '29';
# validate that when merging two tickets, the comments from both tickets
# are integrated into the new ticket
{
- my $queue = RT::Queue->new($RT::SystemUser);
+ my $queue = RT::Queue->new(RT->SystemUser);
my ($id,$msg) = $queue->Create(Name => 'MergeTest-'.rand(25));
ok ($id,$msg);
- my $t1 = RT::Ticket->new($RT::SystemUser);
+ my $t1 = RT::Ticket->new(RT->SystemUser);
my ($tid,$transid, $t1msg) =$t1->Create(
Queue => $queue->Name,
Subject => 'Merge test. orig',
@@ -31,7 +31,7 @@ use RT::Test tests => '29';
}
is($Comments,1, "our first ticket has only one Comment");
- my $t2 = RT::Ticket->new($RT::SystemUser);
+ my $t2 = RT::Ticket->new(RT->SystemUser);
my ($t2id,$t2transid, $t2msg) =$t2->Create ( Queue => $queue->Name, Subject => 'Merge test. duplicate');
ok ($t2id, $t2msg);
@@ -71,15 +71,15 @@ use RT::Test tests => '29';
# when you try to merge duplicate links on postgres, eveyrything goes to hell due to referential integrity constraints.
{
- my $t = RT::Ticket->new($RT::SystemUser);
+ my $t = RT::Ticket->new(RT->SystemUser);
$t->Create(Subject => 'Main', Queue => 'general');
ok ($t->id);
- my $t2 = RT::Ticket->new($RT::SystemUser);
+ my $t2 = RT::Ticket->new(RT->SystemUser);
$t2->Create(Subject => 'Second', Queue => 'general');
ok ($t2->id);
- my $t3 = RT::Ticket->new($RT::SystemUser);
+ my $t3 = RT::Ticket->new(RT->SystemUser);
$t3->Create(Subject => 'Third', Queue => 'general');
ok ($t3->id);