[Rt-commit] [svn] r770 - rt/branches/rt-3.1/lib/RT

[leira at pallas.eruditorum.org]

Author: leira
Date: Wed Apr 28 23:27:54 2004
New Revision: 770

Modified:
   rt/branches/rt-3.1/lib/RT/Tickets_Overlay_SQL.pm
Log:
Fixed borken tests.


Modified: rt/branches/rt-3.1/lib/RT/Tickets_Overlay_SQL.pm
==============================================================================
--- rt/branches/rt-3.1/lib/RT/Tickets_Overlay_SQL.pm	(original)
+++ rt/branches/rt-3.1/lib/RT/Tickets_Overlay_SQL.pm	Wed Apr 28 23:27:54 2004
@@ -488,8 +488,7 @@
     push @expectedids, $tick->Id;
 }
 
-# this doesn't work as expected
-# eq_array(\@ids, \@expectedids);
+ok (eq_array(\@ids, \@expectedids), "returned expected tickets");
 
 $query = ("id = $ids[0] OR MemberOf = $ids[0]");
 
@@ -499,13 +498,12 @@
 
 is ($tix->Count, scalar @ids, "number of returned tickets same as entered");
 
- at expectedids = undef;
+ at expectedids = ();
 while (my $tick = $tix->Next) {
     push @expectedids, $tick->Id;
 }
 
-# this doesn't work as expected
-# eq_array(\@ids, \@expectedids);
+ok (eq_array(\@ids, \@expectedids), "returned expected tickets");
 
 =end testing