percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-29 09:32:47 +00: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

16
t/pt-kill/group_by.t
View File

@@ -25,7 +25,7 @@ my $output;
# The 3rd query (id 4) is user=root. Next we'll test that we can filter
# that one out.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --each-busy-time 2 --match-all),
qw(--victims all-but-oldest --print)); }
);
@@ -37,7 +37,7 @@ like(
# Now with --match-user user1, the 3rd query is not matched.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --each-busy-time 2 --match-user user1),
qw(--victims all-but-oldest --print)); }
);
@@ -52,7 +52,7 @@ like(
# 9, but the 10 does. This is correct (see issue 1221) because --victims
# is applied *after* per-class query matching.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --any-busy-time 10 --match-user user1),
qw(--victims oldest --print)); }
);
@@ -63,7 +63,7 @@ is(
);
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --any-busy-time 9 --match-user user1),
qw(--victims oldest --print)); }
);
@@ -75,7 +75,7 @@ like(
# Nothing matches because --each-busy-time isn't satifised.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --each-busy-time 10 --match-user user1),
qw(--victims all-but-oldest --print)); }
);
@@ -87,7 +87,7 @@ is(
# Each busy time matches on the lowest possible value.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --each-busy-time 8 --match-user user1),
qw(--victims all-but-oldest --print)); }
);
@@ -99,7 +99,7 @@ like(
# Nothing matches because --query-count isn't satisified.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 4 --each-busy-time 1 --match-user user1),
qw(--victims all-but-oldest --print)); }
);
@@ -111,7 +111,7 @@ is(
# Without stripping comments, the queries won't be grouped into a class.
$output = output(
sub { mk_kill::main("$sample/recset010.txt", qw(--print),
sub { pt_kill::main("$sample/recset010.txt", qw(--print),
qw(--group-by info --query-count 2 --each-busy-time 2 --match-user user1),
qw(--victims all-but-oldest --print --no-strip-comments)); }
);