loncom/interface/lonstatistics.pm - diff

Return to lonstatistics.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.156, 2012/05/03 11:21:27	version 1.157, 2013/03/06 11:39:00
Line 691 sub DisplayClasslist {	Line 691 sub DisplayClasslist {
}	}

$Str .= '<h2>'.&mt('Select One Student').'</h2>'	$Str .= '<h2>'.&mt('Select One Student').'</h2>'
.'<p>'.&mt("Click on a student's name or username to view their chart").'</p>'	.'<p>'.&mt("Click on a student's name or username to view their chart.").'</p>'
.&Apache::loncommon::start_data_table()	.&Apache::loncommon::start_data_table()
.&Apache::loncommon::start_data_table_header_row();	.&Apache::loncommon::start_data_table_header_row();
foreach my $field (@Fields) {	foreach my $field (@Fields) {
Line 715 sub DisplayClasslist {	Line 715 sub DisplayClasslist {
$Str .= '&sort='.&escape($env{'form.sort'});	$Str .= '&sort='.&escape($env{'form.sort'});
$Str .= '&SelectedStudent=';	$Str .= '&SelectedStudent=';
$Str .= &escape($sname).'">';	$Str .= &escape($sname).'">';
$Str .= $student->{$field}.' ';	$Str .= $student->{$field};
$Str .= '</a>';	$Str .= '</a>';
} elsif ($field eq 'status') {	} elsif ($field eq 'status') {
$Str .= &mt($student->{$field});	$Str .= &mt($student->{$field});
} else {	} else {
$Str .= $student->{$field};	if ($student->{$field} eq 'none') {
	$Str .= &mt('none')
	} else {
	$Str .= $student->{$field};
	}
}	}
$Str .= '</td>';	$Str .= '</td>';
}	}