--- doc/loncapafiles/sanitycheck.piml	2003/01/07 21:12:54	1.12
+++ doc/loncapafiles/sanitycheck.piml	2003/05/27 15:44:32	1.15
@@ -1,9 +1,8 @@
 <!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN" 
 	"http://lpml.sourceforge.net/DTD/piml.dtd">
 <!-- sanitycheck.piml -->
-<!-- Scott Harrison -->
 
-<!-- $Id: sanitycheck.piml,v 1.12 2003/01/07 21:12:54 harris41 Exp $ -->
+<!-- $Id: sanitycheck.piml,v 1.15 2003/05/27 15:44:32 matthew Exp $ -->
 
 <!--
 
@@ -67,6 +66,7 @@ unless
   {
     print("**** ERROR **** Missing <TARGET />\n");
   }
+<!-- Commented out by Matthew since MySQL insists on doing things its own way
 else # It exists, so look at the file metadata more closely.
   {
     my @s = stat('<TARGET />');
@@ -77,7 +77,7 @@ else # It exists, so look at the file me
 
     if ($uid ne $web_uid) # If file owned by someone else other than www.
       {
-	print('**** ERROR **** <TARGET /> should be owned by'.
+	print('**** WARNING **** <TARGET /> should be owned by'.
 	      ' www.'."\n".'Try these commands to make things right:'."\n".
 	      'chown www:www <TARGET />'."\n".
 	      'chmod a-rwx,u+rwx <TARGET />'."\n");
@@ -88,7 +88,7 @@ else # It exists, so look at the file me
 	my $wflag = $1;
 	if ($wflag != 7) # Can www use this socket?  (Hope so!)
 	  {
-	    print('**** ERROR **** '.
+	    print('**** WARNING **** '.
 	      '<TARGET /> should be user "rwx" (by'.
 	      ' www).'."\n".'Try these commands to make things right:'."\n".
 	      'chown www:www <TARGET />'."\n".
@@ -98,7 +98,7 @@ else # It exists, so look at the file me
 	$wflag=$1;
 	if ($wflag ne "00") # Can others use this socket?  (Hope not!)
 	  {
-	    print('**** ERROR **** '.
+	    print('**** WARNING **** '.
 	      '<TARGET /> should not be group or everybody accessible'.
 	      '.'."\n".'Try these commands to make things right:'."\n".
 	      'chown www:www <TARGET />'."\n".
@@ -106,6 +106,7 @@ else # It exists, so look at the file me
 	  }
       }
   }
+ -->
 </perlscript>
 </file>
 <file>