3.0.5 Testing

This commit is contained in:
Carlos Salguero
2017-11-07 17:52:14 -03:00
parent a7d4439155
commit e428fa5187
24 changed files with 186 additions and 75 deletions

View File

@@ -66,7 +66,9 @@ my $modes_host2 = new SqlModes($dbh2, global=>1);
$modes_host1->del('STRICT_TRANS_TABLES');
$modes_host2->del('STRICT_TRANS_TABLES');
while ( my $sampleno = readdir $dh ) {
my @dirs = sort readdir($dh);
foreach my $sampleno (@dirs) {
next unless $sampleno =~ m/^\d+$/;
my $conf = "$samples_dir/$sampleno/conf";