percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-04-17 01:01:39 +08:00
Code Issues Packages Projects Releases Wiki Activity

Skip utf8 tests when DBD::mysql less than 4.0

Browse Source
This commit is contained in:
Baron Schwartz
2012-06-04 00:23:55 -04:00
parent 45c85ba40d
commit 40017ec5bd
2 changed files with 15 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
t/lib/Quoter.t
View File

@@ -194,11 +194,17 @@ SKIP: {
. "]"; . "]";
$flat_string =~ s/\n/\\n/g; $flat_string =~ s/\n/\\n/g;
is_deeply( # diag($test_index);
[ $q->deserialize_list($selsth->fetchrow_array()) ], SKIP: {
$serialize_tests[$test_index], skip "DBD::mysql version $DBD::mysql::VERSION has utf8 bugs. "
"Serialize $flat_string" . "See https://bugs.launchpad.net/percona-toolkit/+bug/932327",
); 1 if $DBD::mysql::VERSION lt '4' && $test_index == 9;
is_deeply(
[ $q->deserialize_list($selsth->fetchrow_array()) ],
$serialize_tests[$test_index],
"Serialize $flat_string"
);
}
} }
$sth->finish(); $sth->finish();

4
t/pt-archiver/issue_1229.t
View File

@@ -22,6 +22,10 @@ my $dbh = $sb->get_dbh_for('master');
if ( !$dbh ) { if ( !$dbh ) {
plan skip_all => 'Cannot connect to sandbox master'; plan skip_all => 'Cannot connect to sandbox master';
} }
elsif ( $DBD::mysql::VERSION lt '4' ) {
plan skip_all => "DBD::mysql version $DBD::mysql::VERSION has utf8 bugs. "
. "See https://bugs.launchpad.net/percona-toolkit/+bug/932327";
}
else { else {
plan tests => 3; plan tests => 3;
} }