--- doc/loncapafiles/webserver.piml 2002/02/02 14:45:40 1.4 +++ doc/loncapafiles/webserver.piml 2002/04/14 20:34:32 1.8 @@ -1,7 +1,9 @@ + - + -/abc/ +/ @@ -58,7 +60,7 @@ else { open IN, "<"; while (<IN>) { if (/^\s*Include\s+conf\/srm.conf/) { $flag=1; } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; print OUT 'Include conf/srm.conf'."\n"; close OUT; @@ -67,7 +69,7 @@ else { open IN, "<"; while (<IN>) { if (/^\s*Include\s+conf\/access.conf/) { $flag=1; } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; print OUT 'Include conf/access.conf'."\n"; close OUT; @@ -81,7 +83,7 @@ else { } } close IN; - unless ($flag==0) { + unless ($flag==1) { open OUT,">>"; print OUT 'Include conf/loncapa.conf'."\n"; close OUT; @@ -98,7 +100,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, @@ -114,7 +116,7 @@ my $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 conf/loncapa.conf'."\n"; close OUT; @@ -130,7 +132,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, @@ -146,7 +148,7 @@ my $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 conf/loncapa.conf'."\n"; close OUT;