version 1.61, 2024/06/20 04:04:55
|
version 1.62, 2024/08/05 15:45:16
|
Line 142 unless (-e "<TARGET />") {
|
Line 142 unless (-e "<TARGET />") {
|
else { |
else { |
# Append loncapa_apache.conf inclusion to httpd.conf |
# Append loncapa_apache.conf inclusion to httpd.conf |
# (or sites-available/loncapa or conf-available/loncapa.conf) if not present. |
# (or sites-available/loncapa or conf-available/loncapa.conf) if not present. |
$flag=0; |
my $absolute_link; |
open(IN,'<<TARGET />'); |
if ('<DIST />' =~ /^sles(\d+)$/) { |
while (<IN>) { |
my $version = $1; |
if (/^\s*Include\s+conf\/loncapa_apache.conf/) { |
if ($version > 11) { |
$flag=1; |
$absolute_link = 1; |
} |
} |
} |
} |
close(IN); |
if ($absolute_link) { |
unless ($flag==1) { |
# For SuSE and SLES /etc/apache2/default-server.conf needs to include: |
open(OUT,'>><TARGET />'); |
# Include /etc/apache2/loncapa_apache.conf |
print(OUT 'Include conf/loncapa_apache.conf'."\n"); |
# instead of: |
close(OUT); |
# Include conf/loncapa_apache.conf |
|
my $delflag=0; |
|
my $addflag=1; |
|
open(IN,'<<TARGET />'); |
|
while (<IN>) { |
|
if (/^\s*Include\s+conf\/loncapa_apache.conf/) { |
|
$delflag=1; |
|
} |
|
if (/^\s*Include\s+\/etc\/apache2\/loncapa_apache.conf/) { |
|
$addflag = 0; |
|
} |
|
} |
|
close(IN); |
|
if ($addflag) { |
|
open(OUT,'>><TARGET />'); |
|
print(OUT 'Include /etc/apache2/loncapa_apache.conf'."\n"); |
|
close(OUT); |
|
} |
|
if ($delflag==1) { |
|
my $in=''; |
|
open(IN,'<<TARGET />'); |
|
while(<IN>) { |
|
$in.=$_ unless /^\s*Include\s+conf\/loncapa_apache.conf/; |
|
} |
|
close(IN); |
|
open(OUT,'><TARGET />'); |
|
print(OUT $in); |
|
close(OUT); |
|
} |
|
} else { |
|
$flag=0; |
|
open(IN,'<<TARGET />'); |
|
while (<IN>) { |
|
if (/^\s*Include\s+conf\/loncapa_apache.conf/) { |
|
$flag=1; |
|
} |
|
} |
|
close(IN); |
|
unless ($flag==1) { |
|
open(OUT,'>><TARGET />'); |
|
print(OUT 'Include conf/loncapa_apache.conf'."\n"); |
|
close(OUT); |
|
} |
} |
} |
# Remove loncapa.conf inclusion from httpd.conf |
# Remove loncapa.conf inclusion from httpd.conf |
# (or sites-available/loncapa or conf-available/loncapa.conf) if present. |
# (or sites-available/loncapa or conf-available/loncapa.conf) if present. |