doc/loncapafiles/sanitycheck.piml - diff

Return to sanitycheck.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.8, 2002/11/26 15:26:44	version 1.11, 2002/12/13 23:15:50
Line 34 http://www.lon-capa.org/	Line 34 http://www.lon-capa.org/
<files>	<files>
<file>	<file>
<target dist='default'>/var/lib/mysql/mysql.sock</target>	<target dist='default'>/var/lib/mysql/mysql.sock</target>
<target dist='redhat7.2 redhat7.3'>/tmp/mysql.sock</target>
<perlscript mode='fg'>	<perlscript mode='fg'>
unless	unless
(-e '<TARGET />') # Does file exist?	(-e '<TARGET />') # Does file exist?
Line 123 my $dbug=0;	Line 122 my $dbug=0;
my $sbug=0;	my $sbug=0;
my $fbug=0;	my $fbug=0;
while (<IN>) {	while (<IN>) {
	next if (/^(\#\|\s*$)/);
if (/\S/) {	if (/\S/) {
$rbug=1 if /\r/;	$rbug=1 if /\r/;
my @a=split(/\:/,$_);	my @a=split(/\:/,$_);