[Rt-commit] [svn] r1248 - in rt/branches/3.2-RELEASE: . bin

[jesse at pallas.eruditorum.org]

Author: jesse
Date: Wed Jul 14 15:32:50 2004
New Revision: 1248

Modified:
   rt/branches/3.2-RELEASE/   (props changed)
   rt/branches/3.2-RELEASE/bin/rt-crontool.in
Log:
 ----------------------------------------------------------------------
 r3390 at tinbook:  jesse | 2004-07-14T19:30:37.426202Z
 
 RT-Ticket: 5886
 RT-Action: correspond
 RT-Status: resolved
 
 Updated rt-crontool to pass in CurrentUser when creating new actions and 
 searches..


Modified: rt/branches/3.2-RELEASE/bin/rt-crontool.in
==============================================================================
--- rt/branches/3.2-RELEASE/bin/rt-crontool.in	(original)
+++ rt/branches/3.2-RELEASE/bin/rt-crontool.in	Wed Jul 14 15:32:50 2004
@@ -83,7 +83,11 @@
 
 #find a bunch of tickets
 my $tickets = RT::Tickets->new($CurrentUser);
-my $search  = $search->new( TicketsObj => $tickets, Argument => $search_arg );
+my $search  = $search->new(
+    TicketsObj  => $tickets,
+    Argument    => $search_arg,
+    CurrentUser => $CurrentUser
+);
 
 $search->Prepare();
 
@@ -97,7 +101,8 @@
     # perform some more advanced check
     if ($condition) {
         my $condition_obj = $condition->new( TicketObj => $ticket,
-                                             Argument  => $condition_arg );
+                                             Argument  => $condition_arg,
+                                             CurrentUser => $CurrentUser );
 
         # if the condition doesn't apply, get out of here
 
@@ -106,9 +111,12 @@
     }
 
     #prepare our action
-    my $action_obj = $action->new( TicketObj => $ticket,
-				   TemplateObj => $template_obj,
-                                   Argument  => $action_arg );
+    my $action_obj = $action->new(
+        TicketObj   => $ticket,
+        TemplateObj => $template_obj,
+        Argument    => $action_arg,
+        CurrentUser => $CurrentUser
+    );
 
     #if our preparation, move onto the next ticket
     next unless ( $action_obj->Prepare );