doc/loncapafiles/sanitycheck.piml - diff

Return to sanitycheck.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.3, 2002/07/17 17:55:07	version 1.5, 2002/08/17 18:59:48
Line 1	Line 1
	<!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN"
	"http://lpml.sourceforge.net/DTD/piml.dtd">
<!-- sanitycheck.piml -->	<!-- sanitycheck.piml -->
<!-- Scott Harrison -->	<!-- Scott Harrison -->

Line 48 while (<IN>) {	Line 50 while (<IN>) {
$dbug=0;	$dbug=0;
$dbug=1 if $v=~/\W/;	$dbug=1 if $v=~/\W/;
$dbug=1 if $v=~/\_/;	$dbug=1 if $v=~/\_/;
	# Avoid namespace conflicts under the web server's DocumentRoot.
	my @badnames=('raw','userfiles','priv','adm','uploaded');
	foreach my $bad (@badnames) {
	$dbug=1 if $v eq $bad;
	}
}	}
}	}
if ($hbug) {	if ($hbug) {