percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-11 05:29:30 +00:00
Code Issues Packages Projects Releases Wiki Activity

Explicit setter for filename.

Browse Source
This commit is contained in:
Brian Fraser
2012-01-10 14:16:44 -03:00
parent 5ad1bc4fbb
commit 13210d1978
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Diskstats.pm
View File

@@ -198,11 +198,15 @@ sub set_device_regex {
}
sub filename {
my ( $self ) = @_;
return $self->{filename};
}
sub set_filename {
my ( $self, $new_filename ) = @_;
if ( $new_filename ) {
return $self->{filename} = $new_filename;
}
return $self->{filename};
}
sub block_size {

2
t/lib/Diskstats.t
View File

@@ -346,7 +346,7 @@ for my $test (
is($got, $expected, "$method: $filename with an extra TS at the top");
$obj->filename( $file_with_trunk );
$obj->set_filename( $file_with_trunk );
$got = output(
sub {
$obj->$method();