Changeset 972 for branches/cname-collision/t

Timestamp:

01/09/26 11:51:45 (3 weeks ago)

Author:

Kris Deugau

Message:

/branches/cname-collision

Merge /trunk r971

Location:

branches/cname-collision

Files:

• . (modified) (1 prop)
• t/DNSTest.pm (modified) (1 diff)

branches/cname-collision/t/DNSTest.pm

@@ -66 +66 @@
 
   my ($rcount) = $dbh->selectrow_array("SELECT count(*) FROM records");
-  BAIL_OUT("# DB looks like it may not be a test DB, found $rcount > 30 records!\n")
-        if $rcount > 50;
-  cmp_ok( $rcount, '<=', 50, "record ($rcount): looks like a test DB" );
+  my $maxrecs = 60;
+  BAIL_OUT("# DB looks like it may not be a test DB, found $rcount > $maxrecs records!\n")
+        if $rcount > $maxrecs;
+  cmp_ok( $rcount, '<=', $maxrecs, "record ($rcount): looks like a test DB" );
 
   # drop all tables etc