Support de SetEnv personalisés
This commit is contained in:
parent
67f63f1032
commit
559e9e3259
|
@ -6,6 +6,7 @@ my $rewrite = $domain->prop('Rewrite') || '';
|
||||||
my $allow = $domain->prop('AllowHosts') || '';
|
my $allow = $domain->prop('AllowHosts') || '';
|
||||||
my $preserve = $domain->prop('ProxyPreserveHost') || 'no';
|
my $preserve = $domain->prop('ProxyPreserveHost') || 'no';
|
||||||
my $keepalive = $domain->prop('ProxyNoKeepAlive') || 'no';
|
my $keepalive = $domain->prop('ProxyNoKeepAlive') || 'no';
|
||||||
|
my @env = split(/[;,]/, ($domain->prop('SetEnv') || ''));
|
||||||
|
|
||||||
# ProxyPass ?
|
# ProxyPass ?
|
||||||
if ($target =~ m|https?://[\d\w\.\-/]*|){
|
if ($target =~ m|https?://[\d\w\.\-/]*|){
|
||||||
|
@ -37,6 +38,11 @@ else{
|
||||||
$OUT .= " DocumentRoot $root\n";
|
$OUT .= " DocumentRoot $root\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
|
foreach (@env){
|
||||||
|
next unless (m/^(.*)=(.*)$/);
|
||||||
|
$OUT .= " SetEnv $1 $2\n";
|
||||||
|
}
|
||||||
|
|
||||||
if ($allow ne ''){
|
if ($allow ne ''){
|
||||||
if ($allow eq 'local'){
|
if ($allow eq 'local'){
|
||||||
$allow = "$localAccess $externalSSLAccess";
|
$allow = "$localAccess $externalSSLAccess";
|
||||||
|
|
Loading…
Reference in New Issue
Block a user