percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-15 07:55:51 +00:00
Code Issues Packages Projects Releases Wiki Activity

Removed indirect object syntax from ProtocolParser.pm

Browse Source
This commit is contained in:
Brian Fraser
2011-12-23 00:38:57 -03:00
parent 7e4b1def6a
commit be40a0280d
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ProtocolParser.pm
View File

@@ -315,7 +315,7 @@ sub uncompress_data {
# Uncompress the compressed binary data. # Uncompress the compressed binary data.
my $uncomp_bin_data = ''; my $uncomp_bin_data = '';
my $z = new IO::Uncompress::Inflate( my $z = IO::Uncompress::Inflate->new(
\$comp_bin_data \$comp_bin_data
) or die "IO::Uncompress::Inflate failed: $InflateError"; ) or die "IO::Uncompress::Inflate failed: $InflateError";
my $status = $z->read(\$uncomp_bin_data, $len) my $status = $z->read(\$uncomp_bin_data, $len)