correct bug in header_in method
This commit is contained in:
parent
4a8c99c7b0
commit
3971e6b740
|
@ -24,7 +24,7 @@ use Sys::Hostname;
|
|||
#use Data::Dumper;
|
||||
#### common declaration #######
|
||||
our( @ISA, $VERSION, @EXPORTS );
|
||||
$VERSION = '3.1.2';
|
||||
$VERSION = '3.2.0';
|
||||
our $VERSION_LEMONLDAP = "3.1.0";
|
||||
our $VERSION_INTERNAL = "3.1.0";
|
||||
|
||||
|
@ -730,11 +730,11 @@ s/$CONFIG{$ID_COLLECTED}->{MOTIFIN}/$CONFIG{$ID_COLLECTED}->{MOTIFOUT}/;
|
|||
|
||||
# copy POST data, if any
|
||||
if ( $r->method eq 'POST' ) {
|
||||
my $len = $r->headers_in('Content-length');
|
||||
my $len = $r->headers_in->{'Content-length'};
|
||||
my $buf;
|
||||
$r->read( $buf, $len );
|
||||
$request->content($buf);
|
||||
$request->content_type( $r->headers_in('Content-Type') );
|
||||
$request->content_type( $r->headers_in->{'Content-Type'} );
|
||||
}
|
||||
|
||||
###begin: some modification like mod_proxy does
|
||||
|
|
Loading…
Reference in New Issue