--- loncom/init.d/loncontrol	2003/10/14 15:36:21	1.12
+++ loncom/init.d/loncontrol	2003/11/06 15:05:23	1.13
@@ -48,20 +48,20 @@ sub stop_daemon {
     print("not running\n");
 }
 
-if (($command eq "restart") or ($command eq "reload")) {
+if (($command eq "restartold") or ($command eq "reloadold")) {
     print 'Restarting LON-CAPA'."\n";
     print 'Ending LON-CAPA client and daemon processes'."\n";
-    foreach my $daemon ('lonsql','lond','lonc','loncnew','lonhttpd') {
+    foreach my $daemon ('lonsql','lond','lonc','lonhttpd') {
 	&stop_daemon($daemon);
     }
     print 'Starting LON-CAPA client and daemon processes (please be patient)'.
 	"\n";
     system("su -c '/home/httpd/perl/loncron' www");
 }
-elsif (($command eq "restartnew") or ($command eq "reloadnew")) {
+elsif (($command eq "restart") or ($command eq "reload")) {
     print 'Restarting LON-CAPA'."\n";
     print 'Ending LON-CAPA client and daemon processes'."\n";
-    foreach my $daemon ('lonsql','lond','lonc','loncnew','lonhttpd') {
+    foreach my $daemon ('lonsql','lond','lonc','lonhttpd') {
 	&stop_daemon($daemon);
     }
     print 'Starting LON-CAPA client and daemon processes (please be patient)'.
@@ -70,7 +70,7 @@ elsif (($command eq "restartnew") or ($c
 }
 elsif ($command eq "stop") {
     print 'Stopping LON-CAPA'."\n";
-    foreach my $daemon ('lonsql','lond','lonc','loncnew','lonhttpd') {
+    foreach my $daemon ('lonsql','lond','lonc','lonhttpd') {
 	&stop_daemon($daemon);
     }
 }