[LON-CAPA-cvs] cvs: modules /raeburn monitor.pl
raeburn
lon-capa-cvs@mail.lon-capa.org
Tue, 29 Mar 2005 17:46:01 -0000
raeburn Tue Mar 29 12:46:01 2005 EDT
Modified files:
/modules/raeburn monitor.pl
Log:
Small fixes.
Index: modules/raeburn/monitor.pl
diff -u modules/raeburn/monitor.pl:1.1 modules/raeburn/monitor.pl:1.2
--- modules/raeburn/monitor.pl:1.1 Mon Mar 28 17:38:58 2005
+++ modules/raeburn/monitor.pl Tue Mar 29 12:46:01 2005
@@ -143,7 +143,7 @@
my %formvalues = ();
my %loadtimes = ();
my ($outcome,$loginpage,$lonid);
-my @failures = ('conlost','unavailable','missingparam','unauthenticated','invalidcookie','nologin','unitialized','rolesfailed','navmapfailed','logoutfailed');
+my @failures = ('conlost','unavailable','missingparam','unauthenticated','invalidcookie','nologin','uninitialized','rolesfailed','navmapfailed','logoutfailed');
if (!-e "$monitordir/$serveralias") {
mkdir("$monitordir/$serveralias",0755);
@@ -293,8 +293,7 @@
$start = [gettimeofday];
if ($response->is_success) {
my $dump = $response->content;
- if ($dump =~ m-<a href="/adm/roles?tryagain=1">-) {
- print "initializing course failed\n";
+ if ($dump =~ m-<a href="/adm/roles\?tryagain=1">-) {
$outcome = 'uninitialized';
} else {
$outcome = 'ok';