init to a blank string not to 0 cos that 0 is cast to a string in this case and causes an off by 1
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@5761 d0543943-73ff-0310-b7d9-9358b9ac24b2
This commit is contained in:
parent
5fff7be5e1
commit
64f1f65771
|
@ -67,7 +67,7 @@ sub readhash($;$) {
|
|||
}
|
||||
|
||||
if ($h->{'content-length'}) {
|
||||
if(! defined $h->{body}) { $h->{body}=0; }
|
||||
if(! defined $h->{body}) { $h->{body} = ""; }
|
||||
while(length($h->{body}) < $h->{'content-length'}) {
|
||||
my $buf;
|
||||
recv $s, $buf, $h->{'content-length'} - length($h->{body}), 0;
|
||||
|
|
Loading…
Reference in New Issue