Diff for /doc/loncapafiles/webserver.piml between versions 1.2 and 1.3

version 1.2, 2002/02/02 12:57:10 version 1.3, 2002/02/02 13:08:42
Line 54  unless (-e "<TARGET />") { Line 54  unless (-e "<TARGET />") {
  'software package';   'software package';
 }  }
 else {  else {
     $flag=0;
     open IN, "&lt;<TARGET />";
     while (&lt;IN&gt;) { if (/^\s*Include\s+srm.conf/) { $flag=1; } }
     close IN;
     unless ($flag==0) {
  open OUT,"&gt;&gt;<TARGET />";   open OUT,"&gt;&gt;<TARGET />";
  print OUT 'Include srm.conf'."\n";   print OUT 'Include srm.conf'."\n";
    close OUT;
     }
     $flag=0;
     open IN, "&lt;<TARGET />";
     while (&lt;IN&gt;) { if (/^\s*Include\s+access.conf/) { $flag=1; } }
     close IN;
     unless ($flag==0) {
    open OUT,"&gt;&gt;<TARGET />";
  print OUT 'Include access.conf'."\n";   print OUT 'Include access.conf'."\n";
  close OUT;   close OUT;
     }
     $flag=0;
     my $eflag=0;
     open IN, "&lt;<TARGET />";
     while (&lt;IN&gt;) { 
       if (/^\s*Include\s+loncapa.conf/) {
         $flag=1; 
       }
     }
     close IN;
     unless ($flag==0) {
    open OUT,"&gt;&gt;<TARGET />";
    print OUT 'Include loncapa.conf'."\n";
    close OUT;
     }
 }  }
 </perlscript>  </perlscript>
 </file>  </file>
Line 82  For backwards compatibility, Line 110  For backwards compatibility,
 <TARGET /> is being generated.  <TARGET /> is being generated.
 END  END
 }  }
   my $flag=0;
   open IN, "&lt;<TARGET />";
   while (&lt;IN&gt;) { if (/^\s*Include\s+loncapa.conf/) { $flag=1; } }
   close IN;
   unless ($flag==0) {
 open OUT,"&gt;&gt;<TARGET />";  open OUT,"&gt;&gt;<TARGET />";
 print OUT 'Include loncapa.conf'."\n";  print OUT 'Include loncapa.conf'."\n";
 close OUT;  close OUT;
   }
 </perlscript>  </perlscript>
 </file>  </file>
 <file>  <file>
Line 108  For backwards compatibility, Line 142  For backwards compatibility,
 <TARGET /> is being generated.  <TARGET /> is being generated.
 END  END
 }  }
   my $flag=0;
   open IN, "&lt;<TARGET />";
   while (&lt;IN&gt;) { if (/^\s*Include\s+loncapa.conf/) { $flag=1; } }
   close IN;
   unless ($flag==0) {
 open OUT,"&gt;&gt;<TARGET />";  open OUT,"&gt;&gt;<TARGET />";
 print OUT 'Include loncapa.conf'."\n";  print OUT 'Include loncapa.conf'."\n";
 close OUT;  close OUT;
   }
 </perlscript>  </perlscript>
 </file>  </file>
 </files>  </files>

Removed from v.1.2  
changed lines
  Added in v.1.3


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>