version 1.146, 2007/12/20 13:57:13
|
version 1.149, 2008/09/16 08:49:08
|
Line 849 sub html_outputstudent {
|
Line 849 sub html_outputstudent {
|
} else { |
} else { |
my $error = $1; |
my $error = $1; |
if (scalar(@tmp) < 1) { |
if (scalar(@tmp) < 1) { |
$Str .= '<font color="blue">No Course Data</font>'."\n"; |
$Str .= '<span class="LC_warning">' |
|
.&mt('No Course Data') |
|
.'</span>'."\n"; |
} else { |
} else { |
$Str .= '<span class="LC_error">Error getting student data ('. |
$Str .= '<span class="LC_error">' |
$error.') </span>'."\n"; |
.&mt('Error getting student data ([_1])',$error) |
|
.'</span>'."\n"; |
} |
} |
$nodata_count++; |
$nodata_count++; |
$r->print($Str); |
$r->print($Str); |
Line 1826 sub csv_finish {
|
Line 1829 sub csv_finish {
|
# |
# |
# Tell the user where to get their csv file |
# Tell the user where to get their csv file |
$r->print('<br />'. |
$r->print('<br />'. |
'<a href="'.$filename.'">'.&mt('Your csv file.').'</a>'."\n"); |
'<a href="'.$filename.'">'.&mt('Your CSV file.').'</a>'."\n"); |
$r->rflush(); |
$r->rflush(); |
&csv_cleanup(); |
&csv_cleanup(); |
return; |
return; |
Line 1958 sub student_tries_on_sequence {
|
Line 1961 sub student_tries_on_sequence {
|
if ( ($links eq 'yes' && $symbol ne ' ') || |
if ( ($links eq 'yes' && $symbol ne ' ') || |
($links eq 'all')) { |
($links eq 'all')) { |
my $link = '/adm/grades'. |
my $link = '/adm/grades'. |
'?symb='.&escape($resource->symb). |
'?symb='.&escape($resource->shown_symb). |
'&student='.$student->{'username'}. |
'&student='.$student->{'username'}. |
'&userdom='.$student->{'domain'}. |
'&userdom='.$student->{'domain'}. |
'&command=submission'; |
'&command=submission'; |
Line 2113 sub student_performance_on_sequence {
|
Line 2116 sub student_performance_on_sequence {
|
# |
# |
if ( ($links eq 'yes' && $symbol ne ' ') || ($links eq 'all')) { |
if ( ($links eq 'yes' && $symbol ne ' ') || ($links eq 'all')) { |
my $link = '/adm/grades' . |
my $link = '/adm/grades' . |
'?symb='.&escape($symb). |
'?symb='.&escape($resource->shown_symb). |
'&student='.$student->{'username'}. |
'&student='.$student->{'username'}. |
'&userdom='.$student->{'domain'}. |
'&userdom='.$student->{'domain'}. |
'&command=submission'; |
'&command=submission'; |