percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-12 14:18:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

Bug 1022622: pt-config-diff is case-sensitive

Browse Source
This commit is contained in:
Brian Fraser
2012-07-27 20:12:45 -03:00
parent 192f38498c
commit ac015477af
4 changed files with 110 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
t/lib/MySQLConfigComparer.t
View File

@@ -9,7 +9,7 @@ BEGIN {
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use Test::More tests => 16;
use Test::More;
use TextResultSetParser();
use MySQLConfigComparer;
@@ -369,6 +369,39 @@ $c2 = new MySQLConfig(
) or print Dumper($diff);
}
# #############################################################################
# Case insensitivity
# #############################################################################
$c1 = new MySQLConfig(
result_set => [['binlog_format', 'MIXED']],
format => 'option_file',
);
$c2 = new MySQLConfig(
result_set => [['binlog_format', 'mixed']],
format => 'option_file',
);
is_deeply(
diff($c1, $c2),
undef,
"Case insensitivity is on by default"
);
my $case_cc = MySQLConfigComparer->new( ignore_case => undef, );
is_deeply(
$case_cc->diff(configs => [$c1, $c2]),
{
binlog_format => [
'MIXED',
'mixed'
]
},
"..but can be turned off"
);
# #############################################################################
# Done.
# #############################################################################
@@ -382,4 +415,5 @@ like(
qr/Complete test coverage/,
'_d() works'
);
exit;
done_testing;