[Rt-commit] r15365 - in rt/branches/3.999-DANGEROUS: lib/RT lib/RT/ScripAction

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Fri Aug 22 09:32:22 2008
New Revision: 15365

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/Reminders.pm
   rt/branches/3.999-DANGEROUS/lib/RT/ScripAction/LinearEscalate.pm
   rt/branches/3.999-DANGEROUS/lib/RT/Test.pm

Log:
 r15968 at sunnavys-mb:  sunnavy | 2008-08-22 21:29:23 +0800
 cleaned up, also some name fix


Modified: rt/branches/3.999-DANGEROUS/lib/RT/Reminders.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Reminders.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Reminders.pm	Fri Aug 22 09:32:22 2008
@@ -68,7 +68,8 @@
 sub ticket_obj {
     my $self = shift;
     unless ( $self->{'_ticketobj'} ) {
-        $self->{'_ticketobj'} = RT::Model::Ticket->new;
+        $self->{'_ticketobj'} =
+          RT::Model::Ticket->new( current_user => RT->system_user );
         $self->{'_ticketobj'}->load( $self->ticket );
     }
     return $self->{'_ticketobj'};
@@ -82,7 +83,8 @@
 
 sub collection {
     my $self = shift;
-    my $col  = RT::Model::TicketCollection->new;
+    my $col =
+      RT::Model::TicketCollection->new( current_user => RT->system_user );
 
     my $query = 'type = "reminder" AND RefersTo = "' . $self->ticket . '"';
 
@@ -113,14 +115,14 @@
         @_
     );
 
-    my $reminder = RT::Model::Ticket->new;
+    my $reminder = RT::Model::Ticket->new( current_user => RT->system_user );
     $reminder->create(
-        subject  => $args{'subject'},
-        owner    => $args{'Owner'},
-        due      => $args{'Due'},
-        RefersTo => $self->ticket,
-        type     => 'reminder',
-        queue    => $self->ticket_obj->queue,
+        subject   => $args{'subject'},
+        owner     => $args{'owner'},
+        due       => $args{'due'},
+        refers_to => $self->ticket,
+        type      => 'reminder',
+        queue     => $self->ticket_obj->queue,
 
     );
     $self->ticket_obj->_new_transaction(

Modified: rt/branches/3.999-DANGEROUS/lib/RT/ScripAction/LinearEscalate.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/ScripAction/LinearEscalate.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/ScripAction/LinearEscalate.pm	Fri Aug 22 09:32:22 2008
@@ -273,11 +273,6 @@
     return 1;
 }
 
-eval "require RT::ScripAction::LinearEscalate_Vendor";
-die $@ if ( $@ && $@ !~ qr{^Can't locate RT/Action/LinearEscalate_Vendor.pm} );
-eval "require RT::ScripAction::LinearEscalate_Local";
-die $@ if ( $@ && $@ !~ qr{^Can't locate RT/Action/LinearEscalate_Local.pm} );
-
 1;
 
 =head1 AUTHORS

Modified: rt/branches/3.999-DANGEROUS/lib/RT/Test.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Test.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Test.pm	Fri Aug 22 09:32:22 2008
@@ -259,8 +259,8 @@
 
 sub load_or_create_custom_field {
     my $self = shift;
-    my %args = ( Disabled => 0, @_ );
-    my $obj  = RT::Model::CustomField->new(RT->system_user);
+    my %args = ( disabled => 0, @_ );
+    my $obj  = RT::Model::CustomField->new( current_user => RT->system_user);
     if ( $args{'name'} ) {
         $obj->load_by_name( name => $args{'name'}, queue => $args{'queue'} );
     }