--- loncom/loncron	2003/02/03 18:03:52	1.36
+++ loncom/loncron	2003/07/29 21:00:21	1.40
@@ -316,8 +316,6 @@ print $fh "</pre>";
 # ---------------------------------------------------------------------- lonsql
 
 my $restartflag=1;
-if ($perlvar{'lonRole'} eq "library") {
-
     print $fh '<hr><a name="lonsql"><h2>lonsql</h2><h3>Log</h3><pre>';
     print "lonsql\n";
     if (-e "$perlvar{'lonDaemons'}/logs/lonsql.log"){
@@ -403,7 +401,7 @@ if ($perlvar{'lonRole'} eq "library") {
 	$atime,$mtime,$ctime,
 	$blksize,$blocks)=stat($fname);
 
-    if ($size>40000) {
+    if ($size>200000) {
 	print $fh "Rotating logs ...<p>";
 	rename("$fname.2","$fname.3");
 	rename("$fname.1","$fname.2");
@@ -411,7 +409,6 @@ if ($perlvar{'lonRole'} eq "library") {
     }
 
     &errout($fh);
-}
 # ------------------------------------------------------------------------ lond
 
 print $fh '<hr><a name="lond"><h2>lond</h2><h3>Log</h3><pre>';
@@ -805,7 +802,10 @@ rename ("$statusdir/newstatus.html","$st
 
 if ($totalcount>200) {
    print "mailing\n";
-   $emailto="$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}";
+   $emailto="$perlvar{'lonAdmEMail'}";
+   if ($totalcount>1000) {
+      $emailto.=",$perlvar{'lonSysEMail'}";
+   }
    $subj="LON: $perlvar{'lonHostID'} E:$errors W:$warnings N:$notices"; 
    system(
  "metasend -b -t $emailto -s '$subj' -f $statusdir/index.html -m text/html");