--- loncom/homework/grades.pm 2005/11/22 19:10:16 1.296 +++ loncom/homework/grades.pm 2005/11/22 19:31:43 1.297 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.296 2005/11/22 19:10:16 www Exp $ +# $Id: grades.pm,v 1.297 2005/11/22 19:31:43 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1851,6 +1851,14 @@ KEYWORDS if ($env{'form.handgrade'} eq 'yes'); $request->print($result); } + if (&Apache::lonnet::allowed('vgr',$env{'request.course.id'})) { + $request->print('
'. + &Apache::loncommon::track_student_link(&mt('View recent activity'),$uname,$udom,'check')); + } + if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) { + $request->print('
'. + &Apache::loncommon::pprmlink(&mt('Set/Change parameters'),$uname,$udom,$symb,'check')); + } my %seen = (); my @partlist; @@ -1879,16 +1887,7 @@ KEYWORDS # print end of form if ($counter == $total) { - my $endform=''; - if (&Apache::lonnet::allowed('vgr',$env{'request.course.id'})) { - $endform.='
'. - &Apache::loncommon::track_student_link(&mt('View recent activity'),$uname,$udom,'check'); - } - if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) { - $endform.='
'. - &Apache::loncommon::pprmlink(&mt('Set/Change parameters'),$uname,$udom,$symb,'check'); - } - $endform.='
'."\n"; + my $endform='
'."\n"; $endform.='  '."\n";