Commit 84b84718 authored by Eric German's avatar Eric German

add sourceredirection and targetredirection parameter

parent 29dd6d1e
......@@ -26,5 +26,5 @@ Revision history for Perl extension Lemonldap::Handlers::Generic.
- correct syntax
3.5.3 Oct 24 2007
- add management timeout in case of CDA
- add sourceredirection and targetredirection (location header)
\ No newline at end of file
......@@ -883,7 +883,10 @@ END
### begin: I correct on the fly some incomming header like mod_proxy does
if ( $response->header('Location') ) {
my $h = $response->header('Location');
### In case of multihoming context , sometimes location is not a well know location ,so I must adjust this handly
if ($CONFIG{$ID_COLLECTED}->{SOURCEREDIRECTION}) {
$h=~ s/$CONFIG{$ID_COLLECTED}->{SOURCEREDIRECTION}/$CONFIG{$ID_COLLECTED}->{TARGETREDIRECTION}/;
}
#Patch 16/07/2007 pour traitement du port dans le Location des 302
......@@ -917,9 +920,6 @@ my $trait_loc;
}
$response->header( 'Location' => $h );
#DEBUG ADO
#
print STDERR "DEBUG ADO Location : FLAG: $flag PRIV : $CONFIG{$ID_COLLECTED}->{BASEPRIV} PUB: $CONFIG{$ID_COLLECTED}->{BASEPUB} " ;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment