dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Handler: correct Proxy bugs

Browse Source
This commit is contained in:
Clément Oudot 2010-03-23 15:26:33 +00:00
parent f4a724b0b9
commit 857d421b1e
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
modules/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Proxy.pm
View File

@ -7,10 +7,10 @@ package Lemonldap::NG::Handler::Proxy;
use strict;
use Lemonldap::NG::Handler::Simple qw(:apache :headers);
use Lemonldap::NG::Handler::Simple qw(:apache :headers :traces);
use LWP::UserAgent;
our $VERSION = '0.41';
our $VERSION = '0.42';
##########################################
# COMPATIBILITY WITH APACHE AND APACHE 2 #
@ -85,7 +85,7 @@ sub run($$) {
# copy POST data, if any
if ( $r->method eq "POST" ) {
my $len = $r->header_in('Content-Length');
my $len = $r->headers_in->{'Content-Length'};
my $buf;
$r->read( $buf, $len );
$request->content($buf);
@ -142,7 +142,6 @@ sub headers {
1;
}
);
$r->send_http_header;
$headers_set = 1;
}

2
modules/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Simple.pm
View File

@ -71,7 +71,7 @@ BEGIN {
lmSetHeaderOut lmSetErrHeaderOut $cookieName $https $port
)
],
traces => [qw( $whatToTrace $statusPipe $statusOut )],
traces => [qw( $whatToTrace $statusPipe $statusOut lmLog )],
apache => [qw( MP OK REDIRECT FORBIDDEN DONE DECLINED SERVER_ERROR )],
post => [qw($transform)],
cda => ['$cda'],