--- doc/loncapafiles/webserver.piml	2002/02/02 14:45:40	1.4
+++ doc/loncapafiles/webserver.piml	2002/05/12 19:02:18	1.9
@@ -1,7 +1,9 @@
+<!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN" 
+	"http://lpml.sourceforge.net/DTD/piml.dtd">
 <!-- webserver.piml -->
 <!-- Scott Harrison -->
 
-<!-- $Id: webserver.piml,v 1.4 2002/02/02 14:45:40 harris41 Exp $ -->
+<!-- $Id: webserver.piml,v 1.9 2002/05/12 19:02:18 harris41 Exp $ -->
 
 <!--
 
@@ -36,7 +38,7 @@ http://www.lon-capa.org/
 <!-- defined. -->
 
 <piml>
-<targetroot>/abc/</targetroot>
+<targetroot>/</targetroot>
 <specialnotices>
 <specialnotice>
 </specialnotice>
@@ -58,7 +60,7 @@ else {
   open IN, "&lt;<TARGET />";
   while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/srm.conf/) { $flag=1; } }
   close IN;
-  unless ($flag==0) {
+  unless ($flag==1) {
 	open OUT,"&gt;&gt;<TARGET />";
 	print OUT 'Include conf/srm.conf'."\n";
 	close OUT;
@@ -67,13 +69,26 @@ else {
   open IN, "&lt;<TARGET />";
   while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/access.conf/) { $flag=1; } }
   close IN;
-  unless ($flag==0) {
+  unless ($flag==1) {
 	open OUT,"&gt;&gt;<TARGET />";
 	print OUT 'Include conf/access.conf'."\n";
 	close OUT;
   }
-  $flag=0;
   my $eflag=0;
+  $flag=0;
+  open IN, "&lt;<TARGET />";
+  while (&lt;IN&gt;) { 
+    if (/^\s*Include\s+conf\/loncapa_apache.conf/) {
+      $flag=1; 
+    }
+  }
+  close IN;
+  unless ($flag==1) {
+	open OUT,"&gt;&gt;<TARGET />";
+	print OUT 'Include conf/loncapa_apache.conf'."\n";
+	close OUT;
+  }
+  $flag=0;
   open IN, "&lt;<TARGET />";
   while (&lt;IN&gt;) { 
     if (/^\s*Include\s+conf\/loncapa.conf/) {
@@ -81,7 +96,7 @@ else {
     }
   }
   close IN;
-  unless ($flag==0) {
+  unless ($flag==1) {
 	open OUT,"&gt;&gt;<TARGET />";
 	print OUT 'Include conf/loncapa.conf'."\n";
 	close OUT;
@@ -98,7 +113,7 @@ Apache</note>
 </dependencies>
 <perlscript mode='fg'>
 unless (-e "<TARGET />") {
-	print &lt;&lt;;
+	print &lt;&lt;END;
 WARNING! access.conf is not currently present on your system.
 This is either due to 
 * you are missing the Apache software package,
@@ -112,9 +127,18 @@ END
 }
 my $flag=0;
 open IN, "&lt;<TARGET />";
+while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/loncapa_apache.conf/)
+	 { $flag=1; } }
+close IN;
+unless ($flag==1) {
+open OUT,"&gt;&gt;<TARGET />";
+print OUT 'Include conf/loncapa_apache.conf'."\n";
+close OUT;
+$flag=0;
+open IN, "&lt;<TARGET />";
 while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } }
 close IN;
-unless ($flag==0) {
+unless ($flag==1) {
 open OUT,"&gt;&gt;<TARGET />";
 print OUT 'Include conf/loncapa.conf'."\n";
 close OUT;
@@ -130,7 +154,7 @@ Apache</note>
 </dependencies>
 <perlscript mode='fg'>
 unless (-e "<TARGET />") {
-	print &lt;&lt;;
+	print &lt;&lt;END;
 WARNING! srm.conf is not currently present on your system.
 This is either due to 
 * you are missing the Apache software package,
@@ -144,9 +168,18 @@ END
 }
 my $flag=0;
 open IN, "&lt;<TARGET />";
+while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/loncapa_apache.conf/)
+ { $flag=1; } }
+close IN;
+unless ($flag==1) {
+open OUT,"&gt;&gt;<TARGET />";
+print OUT 'Include conf/loncapa_apache.conf'."\n";
+close OUT;
+$flag=0;
+open IN, "&lt;<TARGET />";
 while (&lt;IN&gt;) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } }
 close IN;
-unless ($flag==0) {
+unless ($flag==1) {
 open OUT,"&gt;&gt;<TARGET />";
 print OUT 'Include conf/loncapa.conf'."\n";
 close OUT;