Removed --check-attributes-limit

This commit is contained in:
Brian Fraser
2013-02-25 12:37:23 -03:00
parent 5e8f369ab7
commit 78cae8b91b
3 changed files with 8 additions and 5 deletions

View File

@@ -5171,7 +5171,7 @@ sub new {
keys %$attributes
},
worst => $args{worst},
unroll_limit => $args{unroll_limit} || 1000,
unroll_limit => $ENV{PT_QUERY_DIGEST_CHECK_ATTRIB_LIMIT} || 1000,
attrib_limit => $args{attrib_limit},
result_classes => {},
result_globals => {},
@@ -13455,7 +13455,6 @@ sub main {
worst => $orderby_attrib,
attrib_limit => $o->get('attribute-value-limit'),
ignore_attributes => $o->get('ignore-attributes'),
unroll_limit => $o->get('check-attributes-limit'),
type_for => $type_for,
);
push @ea, $ea;

View File

@@ -23,7 +23,8 @@ my $output;
# #############################################################################
# This issue actually introduced --check-attributes-limit.
$cmd = "${run_with}slow030.txt";
$output = `$cmd --check-attributes-limit 100 2>&1`;
local $ENV{PT_QUERY_DIGEST_CHECK_ATTRIB_LIMIT} = 100;
$output = `$cmd 2>&1`;
unlike(
$output,
qr/IDB IO rb/,

View File

@@ -387,8 +387,11 @@ ok(
# #############################################################################
ok(
no_diff(
sub { pt_query_digest::main(@args, $sample.'slow054.txt',
qw(--check-attributes-limit 5)) },
sub {
local $ENV{PT_QUERY_DIGEST_CHECK_ATTRIB_LIMIT} = 5;
pt_query_digest::main(@args, $sample.'slow054.txt',
qw(--check-attributes-limit 5))
},
"t/pt-query-digest/samples/slow054.txt",
),
'Analysis for slow054 (InnoDB_trx_id bug 821694)'