version 1.74, 2001/11/06 10:43:57
|
version 1.75, 2001/11/06 11:14:42
|
Line 1245 sub updatestudentassesssheet {
|
Line 1245 sub updatestudentassesssheet {
|
# --------------------------------------------------------- Get all assessments |
# --------------------------------------------------------- Get all assessments |
|
|
my %allkeys=('timestamp' => |
my %allkeys=('timestamp' => |
'Timestamp of Last Transaction<br>timestamp'); |
'Timestamp of Last Transaction<br>timestamp', |
|
'subnumber' => |
|
'Number of Submissions<br>subnumber', |
|
'tutornumber' => |
|
'Number of Tutor Responses<br>tutornumber', |
|
'totalpoints' => |
|
'Total Points Granted<br>totalpoints'); |
|
|
my $adduserstr=''; |
my $adduserstr=''; |
if ((&getuname($safeeval) ne $ENV{'user.name'}) || |
if ((&getuname($safeeval) ne $ENV{'user.name'}) || |