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

Change mk_tool::main() to pt_tool::main() in all tests.

Browse Source
This commit is contained in:
Daniel Nichter
2011-06-29 11:56:49 -06:00
parent fd0941534a
commit 8e11cd85b3
112 changed files with 357 additions and 357 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
t/pt-archiver/purge.t
View File

@@ -36,7 +36,7 @@ $sb->load_file('master', 't/pt-archiver/samples/table1.sql');
# Test basic functionality with defaults
$output = output(
sub { mk_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--purge)) },
sub { pt_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--purge)) },
);
is($output, '', 'Basic test run did not die');
$output = `/tmp/12345/use -N -e "select count(*) from test.table_1"`;
@@ -45,7 +45,7 @@ is($output + 0, 0, 'Purged ok');
# Test basic functionality with --commit-each
$sb->load_file('master', 't/pt-archiver/samples/table1.sql');
$output = output(
sub { mk_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--commit-each --limit 1 --purge)) },
sub { pt_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--commit-each --limit 1 --purge)) },
);
is($output, '', 'Commit-each did not die');
$output = `/tmp/12345/use -N -e "select count(*) from test.table_1"`;
@@ -54,7 +54,7 @@ is($output + 0, 0, 'Purged ok with --commit-each');
# Archive only part of the table
$sb->load_file('master', 't/pt-archiver/samples/table1.sql');
$output = output(
sub { mk_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--where a<4 --purge)) },
sub { pt_archiver::main(qw(--where 1=1), "--source", "D=test,t=table_1,F=$cnf", qw(--where a<4 --purge)) },
);
is($output, '', 'No output for archiving only part of a table');
$output = `/tmp/12345/use -N -e "select count(*) from test.table_1"`;