[LON-CAPA-cvs] cvs: loncom / loncron
www
www@source.lon-capa.org
Wed, 22 Apr 2009 09:41:21 -0000
www Wed Apr 22 09:41:21 2009 EDT
Modified files:
/loncom loncron
Log:
Check up on lonr.
Unfortunately, my loncontrol (not yet committed) fails to properly start
lonr.
Index: loncom/loncron
diff -u loncom/loncron:1.79 loncom/loncron:1.80
--- loncom/loncron:1.79 Wed Feb 11 15:24:28 2009
+++ loncom/loncron Wed Apr 22 09:41:21 2009
@@ -2,7 +2,7 @@
# Housekeeping program, started by cron, loncontrol and loncron.pl
#
-# $Id: loncron,v 1.79 2009/02/11 15:24:28 raeburn Exp $
+# $Id: loncron,v 1.80 2009/04/22 09:41:21 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -408,7 +408,7 @@
opendir(SOCKETS,$perlvar{'lonSockDir'});
while (my $fname=readdir(SOCKETS)) {
next if (-d $fname
- || $fname=~/(mysqlsock|maximasock|\Q$perlvar{'lonSockDir'}\E)/);
+ || $fname=~/(mysqlsock|maximasock|rsock|\Q$perlvar{'lonSockDir'}\E)/);
$cleaned++;
&log($fh,"Unlinking $fname<br />");
unlink("/home/httpd/sockets/$fname");
@@ -700,6 +700,7 @@
}
&checkon_daemon($fh,'lonc',40000,'USR1');
&checkon_daemon($fh,'lonmaxima',40000);
+ &checkon_daemon($fh,'lonr',40000);
}
if ($justreload) {
&checkon_daemon($fh,'lond',40000,'USR2');