X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Ft%2Fticket%2Fbatch-upload-csv.t;h=8dc906e1b775e7fde636771d925d4ee0a15fb8b7;hb=919e930aa9279b3c5cd12b593889cd6de79d67bf;hp=41dc78696829f59016904f6905de6103bdad2662;hpb=b4b0c7e72d7eaee2fbfc7022022c9698323203dd;p=freeside.git

diff --git a/rt/t/ticket/batch-upload-csv.t b/rt/t/ticket/batch-upload-csv.t
index 41dc78696..8dc906e1b 100644
--- a/rt/t/ticket/batch-upload-csv.t
+++ b/rt/t/ticket/batch-upload-csv.t
@@ -1,5 +1,5 @@
-#!/usr/bin/perl -w
-use strict; use warnings;
+use strict;
+use warnings;
 
 use RT::Test tests => 12;
 use_ok('RT');
@@ -8,10 +8,10 @@ use_ok('RT::Action::CreateTickets');
 
 my $QUEUE = 'uploadtest-'.$$;
 
-my $queue_obj = RT::Queue->new($RT::SystemUser);
+my $queue_obj = RT::Queue->new(RT->SystemUser);
 $queue_obj->Create(Name => $QUEUE);
 
-my $cf = RT::CustomField->new($RT::SystemUser);
+my $cf = RT::CustomField->new(RT->SystemUser);
 my ($val,$msg)  = $cf->Create(Name => 'Work Package-'.$$, Type => 'Freeform', LookupType => RT::Ticket->CustomFieldLookupType, MaxValues => 1);
 ok($cf->id);
 ok($val,$msg);
@@ -32,7 +32,7 @@ ok ($action->CurrentUser->id , "WE have a current user");
 $action->Parse(Content => $data);
 my @results = $action->CreateByTemplate();
 
-my $tix = RT::Tickets->new($RT::SystemUser);
+my $tix = RT::Tickets->new(RT->SystemUser);
 $tix->FromSQL ("Queue = '". $QUEUE."'");
 $tix->OrderBy( FIELD => 'id', ORDER => 'ASC' );
 is($tix->Count, 2, '2 tickets');
@@ -45,4 +45,3 @@ is($first->FirstCustomFieldValue($cf->id), '2.0');
 my $second = $tix->Next;
 is($second->Subject(), 'hello'); 
 is($second->FirstCustomFieldValue($cf->id), '3.0');
-1;