Explicit setter for filename.

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

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 {