percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-10 21:19:59 +00:00
Code Issues Packages Projects Releases Wiki Activity

Explicit setter for interactive.

Browse Source
This commit is contained in:
Brian Fraser
2012-01-10 14:01:11 -03:00
parent 79bdf3f1d3
commit ae76c73395
4 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Diskstats.pm
View File

@@ -145,11 +145,15 @@ sub set_sample_time {
} }
sub interactive { sub interactive {
my ($self) = @_;
return $self->{interactive};
}
sub set_interactive {
my ($self, $new_val) = @_; my ($self, $new_val) = @_;
if (defined($new_val)) { if (defined($new_val)) {
$self->{interactive} = $new_val; $self->{interactive} = $new_val;
} }
return $self->{interactive};
} }
# What this method does is thee-fold: # What this method does is thee-fold:

2
lib/DiskstatsGroupByAll.pm
View File

@@ -35,7 +35,7 @@ sub group_by_all {
$self->clear_state(); $self->clear_state();
if (!$self->interactive) { if (!$self->interactive()) {
$self->parse_from( $self->parse_from(
sample_callback => sub { sample_callback => sub {
$self->print_deltas( $self->print_deltas(

2
lib/DiskstatsGroupByDisk.pm
View File

@@ -88,7 +88,7 @@ sub group_by_disk {
data => $args{data}, data => $args{data},
); );
if ($self->interactive) { if ($self->interactive()) {
if ($self->{_iterations} == -1 && defined($original_offset) if ($self->{_iterations} == -1 && defined($original_offset)
&& eof($args{filehandle})) { && eof($args{filehandle})) {
$self->clear_state; $self->clear_state;

6
lib/DiskstatsMenu.pm
View File

@@ -266,10 +266,10 @@ sub group_by {
# Just aliasing this for a bit. # Just aliasing this for a bit.
for my $obj ( $args{options}->{current_group_by_obj} ) { for my $obj ( $args{options}->{current_group_by_obj} ) {
if ( $obj->isa("DiskstatsGroupBySample") ) { if ( $obj->isa("DiskstatsGroupBySample") ) {
$obj->interactive(1); $obj->set_interactive(1);
} }
else { else {
$obj->interactive(0); $obj->set_interactive(0);
} }
$obj->group_by( $obj->group_by(
filehandle => $args{filehandle}, filehandle => $args{filehandle},
@@ -283,7 +283,7 @@ sub group_by {
}; };
}->(), }->(),
); );
$obj->interactive(1); $obj->set_interactive(1);
$obj->{_print_header} = 0; $obj->{_print_header} = 0;
} }
} }