loncom/cgi/userstatus.pl - diff

Return to userstatus.pl CVS log

Up to [LON-CAPA] / loncom / cgi

version 1.1, 2003/02/25 21:56:48	version 1.2, 2003/02/26 14:10:38
Line 55 while ($filename=readdir(DIR)) {	Line 55 while ($filename=readdir(DIR)) {
if ($since>7200) { $color="#888888"; }	if ($since>7200) { $color="#888888"; }
if ($since>21600) { $color="#AAAAAA"; $userclass="Inactive"; }	if ($since>21600) { $color="#AAAAAA"; $userclass="Inactive"; }
$usercount{$userclass}++;	$usercount{$userclass}++;
	$usercount{'in Domain '.$userinfo{'user.domain'}}++;
print '<font color="'.$color.'">';	print '<font color="'.$color.'">';
print '<h3>'.$userinfo{'environment.lastname'}.', '.	print '<h3>'.$userinfo{'environment.lastname'}.', '.
$userinfo{'environment.firstname'}.' '.	$userinfo{'environment.firstname'}.' '.