Fix bug that caused not all "right keys" to be compared in certain cases.

This commit is contained in:
Daniel Nichter
2012-05-14 19:05:32 -06:00
parent 7fc8a3e989
commit e932c89d9e
6 changed files with 94 additions and 4 deletions

View File

@@ -23,7 +23,7 @@ if ( !$dbh ) {
plan skip_all => 'Cannot connect to sandbox master';
}
else {
plan tests => 8;
plan tests => 9;
}
my $output;
@@ -95,6 +95,17 @@ ok(
'No results for nonexistent db'
);
$dbh->do('create database test');
$sb->load_file('master', 't/lib/samples/dupekeys/dupe-cluster-bug-894140.sql', 'test');
ok(
no_diff(
sub { pt_duplicate_key_checker::main(@args, qw(-d test)) },
"$sample/bug-894140.txt",
),
"Bug 894140"
);
# #############################################################################
# Done.
# #############################################################################