[LON-CAPA-cvs] cvs: loncom /init.d loncontrol

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 18 Dec 2003 21:23:01 -0000


albertel		Thu Dec 18 16:23:01 2003 EDT

  Modified files:              
    /loncom/init.d	loncontrol 
  Log:
  - defaulting back to the old lonc
  
  
Index: loncom/init.d/loncontrol
diff -u loncom/init.d/loncontrol:1.14 loncom/init.d/loncontrol:1.15
--- loncom/init.d/loncontrol:1.14	Mon Dec  8 13:59:30 2003
+++ loncom/init.d/loncontrol	Thu Dec 18 16:23:01 2003
@@ -48,7 +48,7 @@
     print("not running\n");
 }
 
-if (($command eq "restartold") or ($command eq "reloadold")) {
+if (($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','lonhttpd') {
@@ -58,7 +58,7 @@
 	"\n";
     system("su -c '/home/httpd/perl/loncron' www");
 }
-elsif (($command eq "restart") or ($command eq "reload")) {
+elsif (($command eq "restartnew") or ($command eq "reloadnew")) {
     print 'Restarting LON-CAPA'."\n";
     print 'Ending LON-CAPA client and daemon processes'."\n";
     foreach my $daemon ('lonsql','lond','lonc','lonhttpd') {
@@ -74,13 +74,13 @@
 	&stop_daemon($daemon);
     }
 }
-elsif ($command eq "startold") {
+elsif ($command eq "start") {
     print 'Starting LON-CAPA'."\n";
     print 'Starting LON-CAPA client and daemon processes (please be patient)'.
 	"\n"; 
     system("su -c '/home/httpd/perl/loncron' www");
 }
-elsif ($command eq "start") {
+elsif ($command eq "startnew") {
     print 'Starting LON-CAPA'."\n";
     print 'Starting LON-CAPA client and daemon processes (please be patient)'.
 	"\n";