summaryrefslogtreecommitdiff
path: root/rt/t/api/condition-ownerchange.t
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/api/condition-ownerchange.t')
-rw-r--r--rt/t/api/condition-ownerchange.t51
1 files changed, 0 insertions, 51 deletions
diff --git a/rt/t/api/condition-ownerchange.t b/rt/t/api/condition-ownerchange.t
deleted file mode 100644
index 4c4c49b29..000000000
--- a/rt/t/api/condition-ownerchange.t
+++ /dev/null
@@ -1,51 +0,0 @@
-
-use strict;
-use warnings;
-use RT;
-use RT::Test tests => 11;
-
-
-{
-
-my $q = RT::Queue->new($RT::SystemUser);
-$q->Create(Name =>'ownerChangeTest');
-
-ok($q->Id, "Created a scriptest queue");
-
-my $s1 = RT::Scrip->new($RT::SystemUser);
-my ($val, $msg) =$s1->Create( Queue => $q->Id,
- ScripAction => 'User Defined',
- ScripCondition => 'On Owner Change',
- CustomIsApplicableCode => '',
- CustomPrepareCode => 'return 1',
- CustomCommitCode => '
- $self->TicketObj->SetPriority($self->TicketObj->Priority+1);
- return(1);
- ',
- Template => 'Blank'
- );
-ok($val,$msg);
-
-my $ticket = RT::Ticket->new($RT::SystemUser);
-my ($tv,$ttv,$tm) = $ticket->Create(Queue => $q->Id,
- Subject => "hair on fire",
- InitialPriority => '20'
- );
-ok($tv, $tm);
-ok($ticket->SetOwner('root'));
-is ($ticket->Priority , '21', "Ticket priority is set right");
-ok($ticket->Steal);
-is ($ticket->Priority , '22', "Ticket priority is set right");
-ok($ticket->Untake);
-is ($ticket->Priority , '23', "Ticket priority is set right");
-ok($ticket->Take);
-is ($ticket->Priority , '24', "Ticket priority is set right");
-
-
-
-
-
-
-}
-
-1;