Author: REHSACK
Date: Mon May 24 05:06:12 2010
New Revision: 14023
Modified:
dbi/trunk/lib/DBI/DBD.pm
Log:
unify additional test combinations
Modified: dbi/trunk/lib/DBI/DBD.pm
==============================================================================
--- dbi/trunk/lib/DBI/DBD.pm (original)
+++ dbi/trunk/lib/DBI/DBD.pm Mon May 24 05:06:12 2010
@@ -3361,6 +3361,14 @@
push @all_keys, @new_keys;
}
+ my %uniq_keys;
+ foreach my $key (@all_keys) {
+ @tv_keys = sort split //, $key;
+ my $ordered = join( '', @tv_keys );
+ $uniq_keys{$ordered} = 1;
+ }
+ @all_keys = sort { length $a <=> length $b or $a cmp $b } keys %uniq_keys;
+
# do whatever needs doing
if( keys %test_variants ) {
# XXX need to convert this to work within the generated Makefile
