[Bps-public-commit] r9489 - RT-Extension-SLA/t

[ruz at bestpractical.com]

Author: ruz
Date: Fri Oct 26 23:28:43 2007
New Revision: 9489

Modified:
   RT-Extension-SLA/t/starts.t

Log:
* make test a  little bit more correct

Modified: RT-Extension-SLA/t/starts.t
==============================================================================
--- RT-Extension-SLA/t/starts.t	(original)
+++ RT-Extension-SLA/t/starts.t	Fri Oct 26 23:28:43 2007
@@ -20,9 +20,9 @@
 diag 'check Starts date';
 {
     %RT::SLA = (
-        Default => 'start',
+        Default => 'standard',
         Levels => {
-            'starts' => {
+            'standard' => {
                 Response => 2*60,
                 Resolve => 7*60*24,
             },
@@ -65,6 +65,6 @@
 
     my $starts = $ticket->StartsObj->Unix;
     ok $starts > 0, 'Starts date is set';
-    ok abs($starts - $time) < 5, 'Starts is quite correct';
+    is $starts, $ticket->CreatedObj->Unix, 'Starts is correct';
 }