loncom/interface/statistics/lonstudentassessment.pm - diff

Return to lonstudentassessment.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.161, 2010/04/14 06:57:17	version 1.162.2.1, 2012/02/17 21:49:58
Line 829 sub html_outputstudent {	Line 829 sub html_outputstudent {
# $r->print("</pre><pre>");	# $r->print("</pre><pre>");
$r->print('</pre>');	$r->print('</pre>');
&Apache::lonhtmlcommon::Increment_PrgWin(	&Apache::lonhtmlcommon::Increment_PrgWin(
$r,\%prog_state,'last five students');	$r,\%prog_state,'last five students',5);
$r->rflush();	$r->rflush();
$r->print('<pre>');	$r->print('<pre>');
}	}
Line 841 sub html_outputstudent {	Line 841 sub html_outputstudent {
if ($field eq 'comments') {	if ($field eq 'comments') {
$title = '<a href="/adm/'.$student->{'domain'}.'/'.$student->{'username'}.'/'.'aboutme#coursecomment">'.&mt('Comments').'</a>';	$title = '<a href="/adm/'.$student->{'domain'}.'/'.$student->{'username'}.'/'.'aboutme#coursecomment">'.&mt('Comments').'</a>';
}	}
	utf8::decode($title);
my $base = length($title);	my $base = length($title);
my $width=$Apache::lonstatistics::StudentData{$field}->{'width'};	my $width=$Apache::lonstatistics::StudentData{$field}->{'width'};
$Str .= $title.' 'x($width-$base).$padding;	$Str .= $title.' 'x($width-$base).$padding;