--- loncom/loncron	2001/02/12 18:53:32	1.16
+++ loncom/loncron	2001/04/11 13:37:39	1.19
@@ -11,7 +11,7 @@
 # 2/8 Gerd Kortemeyer
 # Dec 00 Scott Harrison
 # 12/23 Gerd Kortemeyer
-# 02/12/2001 Scott Harrison
+# 02/12/2001, 04/11/2001 Scott Harrison
 
 use IO::File;
 use IO::Socket;
@@ -56,6 +56,8 @@ ENDERROUT
            $perlvar{$varname}=$varvalue;
         }
     }
+    delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed
+    delete $perlvar{'lonSqlAccess'}; # remove since sensitive and not needed
 }
 
 # --------------------------------------- Make sure that LON-CAPA is configured
@@ -278,7 +280,7 @@ print $fh "</pre>";
 #
 # Do not run for now
 #
-if ($perlvar{'lonRole'} eq "library" && 1==0) {
+if ($perlvar{'lonRole'} eq "library") {
 
     print $fh '<hr><a name="lonsql"><h2>lonsql</h2><h3>Log</h3><pre>';
     
@@ -516,7 +518,7 @@ if ($restartflag==1) {
    $errors++;
    print $fh "<h3>lonc not running, trying to start</h3>";
 	system(
- "$perlvar{'lonDaemons'}/lond 2>>$perlvar{'lonDaemons'}/logs/lonc_errors");
+ "$perlvar{'lonDaemons'}/lonc 2>>$perlvar{'lonDaemons'}/logs/lonc_errors");
    sleep 120;
    if (-e $loncfile) {
        print $fh "Seems like it started ...<p>";
@@ -531,7 +533,7 @@ if ($restartflag==1) {
           print $fh "<h3>lonc at pid $loncpid not responding</h3>";
           print $fh "Give it one more try ...<p>";
  	  system(
- "$perlvar{'lonDaemons'}/lond 2>>$perlvar{'lonDaemons'}/logs/lonc_errors");
+ "$perlvar{'lonDaemons'}/lonc 2>>$perlvar{'lonDaemons'}/logs/lonc_errors");
           sleep 120;
        }
    } else {