loncom/cgi/clusterstatus.pl - diff

Return to clusterstatus.pl CVS log

Up to [LON-CAPA] / loncom / cgi

version 1.17, 2003/08/05 18:47:21	version 1.18, 2003/08/13 21:41:47
Line 212 sub server {	Line 212 sub server {
print &otherwindow($local,'/server-status','Server Status');	print &otherwindow($local,'/server-status','Server Status');
}	}

	sub announcement {
	my $local=shift;
	print &otherwindow($local,'/announcement.txt','Announcement');
	}

# ========================================================= Produce a green bar	# ========================================================= Produce a green bar
sub bar {	sub bar {
my $parm=shift;	my $parm=shift;
Line 236 $local $hostdom{$local}</b> <tt>($hostna	Line 241 $local $hostdom{$local}</b> <tt>($hostna
</font></th></tr><tr><td bgcolor="#DDDDBB"><font color="#225522">	</font></th></tr><tr><td bgcolor="#DDDDBB"><font color="#225522">
ENDHEADER	ENDHEADER
&login($local);&server($local);&users($local);&versions($local);	&login($local);&server($local);&users($local);&versions($local);
	&announcement($local);
&loncron($local);&lond($local);&lonc($local);&runloncron($local);	&loncron($local);&lond($local);&lonc($local);&runloncron($local);
print "</font></td></tr>";	print "</font></td></tr>";
if ($trouble) {	if ($trouble) {