[Rt-commit] r18855 - rt/3.999/branches/datetime/t/ticket

[sartak at bestpractical.com]

Author: sartak
Date: Thu Mar 19 15:00:07 2009
New Revision: 18855

Modified:
   rt/3.999/branches/datetime/t/ticket/action_linear_escalate.t

Log:
Another simplification with RT::DateTime

Modified: rt/3.999/branches/datetime/t/ticket/action_linear_escalate.t
==============================================================================
--- rt/3.999/branches/datetime/t/ticket/action_linear_escalate.t	(original)
+++ rt/3.999/branches/datetime/t/ticket/action_linear_escalate.t	Thu Mar 19 15:00:07 2009
@@ -66,10 +66,9 @@
 sub create_ticket_as_ok {
     my $user = shift;
 
-    my $created = RT::Date->new( current_user => RT->system_user );
-    $created->unix(time() - ( 7 * 24 * 60**2 ));
-    my $due = RT::Date->new( current_user => RT->system_user );
-    $due->unix(time() + ( 7 * 24 * 60**2 ));
+    my $one_week_ago = time() - (7 * 24 * 60 * 60);
+    my $created = RT::DateTime->from_epoch(epoch => $one_week_ago);
+    my $due = RT::DateTime->from_epoch(epoch => $one_week_ago);
 
     my $ticket = RT::Model::Ticket->new( current_user => $user);
     ($id, $msg) = $ticket->create( queue => $q->id,