--- doc/loncapafiles/webserver.piml 2002/02/02 13:08:42 1.3 +++ doc/loncapafiles/webserver.piml 2002/05/12 19:02:18 1.9 @@ -1,7 +1,9 @@ + - + -/abc/ +/ @@ -56,34 +58,47 @@ unless (-e "") { else { $flag=0; open IN, "<"; - while (<IN>) { if (/^\s*Include\s+srm.conf/) { $flag=1; } } + while (<IN>) { if (/^\s*Include\s+conf\/srm.conf/) { $flag=1; } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; - print OUT 'Include srm.conf'."\n"; + print OUT 'Include conf/srm.conf'."\n"; close OUT; } $flag=0; open IN, "<"; - while (<IN>) { if (/^\s*Include\s+access.conf/) { $flag=1; } } + while (<IN>) { if (/^\s*Include\s+conf\/access.conf/) { $flag=1; } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; - print OUT 'Include access.conf'."\n"; + print OUT 'Include conf/access.conf'."\n"; close OUT; } - $flag=0; my $eflag=0; + $flag=0; + open IN, "<"; + while (<IN>) { + if (/^\s*Include\s+conf\/loncapa_apache.conf/) { + $flag=1; + } + } + close IN; + unless ($flag==1) { + open OUT,">>"; + print OUT 'Include conf/loncapa_apache.conf'."\n"; + close OUT; + } + $flag=0; open IN, "<"; while (<IN>) { - if (/^\s*Include\s+loncapa.conf/) { + if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; - print OUT 'Include loncapa.conf'."\n"; + print OUT 'Include conf/loncapa.conf'."\n"; close OUT; } } @@ -98,7 +113,7 @@ Apache unless (-e "") { - print <<; + print <<END; WARNING! access.conf is not currently present on your system. This is either due to * you are missing the Apache software package, @@ -112,11 +127,20 @@ END } my $flag=0; open IN, "<"; -while (<IN>) { if (/^\s*Include\s+loncapa.conf/) { $flag=1; } } +while (<IN>) { if (/^\s*Include\s+conf\/loncapa_apache.conf/) + { $flag=1; } } +close IN; +unless ($flag==1) { +open OUT,">>"; +print OUT 'Include conf/loncapa_apache.conf'."\n"; +close OUT; +$flag=0; +open IN, "<"; +while (<IN>) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } } close IN; -unless ($flag==0) { +unless ($flag==1) { open OUT,">>"; -print OUT 'Include loncapa.conf'."\n"; +print OUT 'Include conf/loncapa.conf'."\n"; close OUT; } @@ -130,7 +154,7 @@ Apache unless (-e "") { - print <<; + print <<END; WARNING! srm.conf is not currently present on your system. This is either due to * you are missing the Apache software package, @@ -144,11 +168,20 @@ END } my $flag=0; open IN, "<"; -while (<IN>) { if (/^\s*Include\s+loncapa.conf/) { $flag=1; } } +while (<IN>) { if (/^\s*Include\s+conf\/loncapa_apache.conf/) + { $flag=1; } } +close IN; +unless ($flag==1) { +open OUT,">>"; +print OUT 'Include conf/loncapa_apache.conf'."\n"; +close OUT; +$flag=0; +open IN, "<"; +while (<IN>) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } } close IN; -unless ($flag==0) { +unless ($flag==1) { open OUT,">>"; -print OUT 'Include loncapa.conf'."\n"; +print OUT 'Include conf/loncapa.conf'."\n"; close OUT; }