doc/loncapafiles/webserver.piml - diff

Return to webserver.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

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

version 1.2, 2002/02/02 12:57:10	version 1.8, 2002/04/14 20:34:32
Line 1	Line 1
	<!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN"
	"http://lpml.sourceforge.net/DTD/piml.dtd">
<!-- webserver.piml -->	<!-- webserver.piml -->
<!-- Scott Harrison -->	<!-- Scott Harrison -->

Line 36 http://www.lon-capa.org/	Line 38 http://www.lon-capa.org/
<!-- defined. -->	<!-- defined. -->

<piml>	<piml>
<targetroot>/abc/</targetroot>	<targetroot>/</targetroot>
<specialnotices>	<specialnotices>
<specialnotice>	<specialnotice>
</specialnotice>	</specialnotice>
Line 54 unless (-e "<TARGET />") {	Line 56 unless (-e "<TARGET />") {
'software package';	'software package';
}	}
else {	else {
	$flag=0;
	open IN, "<<TARGET />";
	while (<IN>) { if (/^\s*Include\s+conf\/srm.conf/) { $flag=1; } }
	close IN;
	unless ($flag==1) {
open OUT,">><TARGET />";	open OUT,">><TARGET />";
print OUT 'Include srm.conf'."\n";	print OUT 'Include conf/srm.conf'."\n";
print OUT 'Include access.conf'."\n";
close OUT;	close OUT;
	}
	$flag=0;
	open IN, "<<TARGET />";
	while (<IN>) { if (/^\s*Include\s+conf\/access.conf/) { $flag=1; } }
	close IN;
	unless ($flag==1) {
	open OUT,">><TARGET />";
	print OUT 'Include conf/access.conf'."\n";
	close OUT;
	}
	$flag=0;
	my $eflag=0;
	open IN, "<<TARGET />";
	while (<IN>) {
	if (/^\s*Include\s+conf\/loncapa.conf/) {
	$flag=1;
	}
	}
	close IN;
	unless ($flag==1) {
	open OUT,">><TARGET />";
	print OUT 'Include conf/loncapa.conf'."\n";
	close OUT;
	}
}	}
</perlscript>	</perlscript>
</file>	</file>
Line 70 Apache</note>	Line 100 Apache</note>
</dependencies>	</dependencies>
<perlscript mode='fg'>	<perlscript mode='fg'>
unless (-e "<TARGET />") {	unless (-e "<TARGET />") {
print <<;	print <<END;
WARNING! access.conf is not currently present on your system.	WARNING! access.conf is not currently present on your system.
This is either due to	This is either due to
* you are missing the Apache software package,	* you are missing the Apache software package,
Line 82 For backwards compatibility,	Line 112 For backwards compatibility,
<TARGET /> is being generated.	<TARGET /> is being generated.
END	END
}	}
	my $flag=0;
	open IN, "<<TARGET />";
	while (<IN>) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } }
	close IN;
	unless ($flag==1) {
open OUT,">><TARGET />";	open OUT,">><TARGET />";
print OUT 'Include loncapa.conf'."\n";	print OUT 'Include conf/loncapa.conf'."\n";
close OUT;	close OUT;
	}
</perlscript>	</perlscript>
</file>	</file>
<file>	<file>
Line 96 Apache</note>	Line 132 Apache</note>
</dependencies>	</dependencies>
<perlscript mode='fg'>	<perlscript mode='fg'>
unless (-e "<TARGET />") {	unless (-e "<TARGET />") {
print <<;	print <<END;
WARNING! srm.conf is not currently present on your system.	WARNING! srm.conf is not currently present on your system.
This is either due to	This is either due to
* you are missing the Apache software package,	* you are missing the Apache software package,
Line 108 For backwards compatibility,	Line 144 For backwards compatibility,
<TARGET /> is being generated.	<TARGET /> is being generated.
END	END
}	}
	my $flag=0;
	open IN, "<<TARGET />";
	while (<IN>) { if (/^\s*Include\s+conf\/loncapa.conf/) { $flag=1; } }
	close IN;
	unless ($flag==1) {
open OUT,">><TARGET />";	open OUT,">><TARGET />";
print OUT 'Include loncapa.conf'."\n";	print OUT 'Include conf/loncapa.conf'."\n";
close OUT;	close OUT;
	}
</perlscript>	</perlscript>
</file>	</file>
</files>	</files>

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

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