|
version 1.295, 2005/11/22 16:39:34
|
version 1.296, 2005/11/22 19:10:16
|
|
Line 1879 KEYWORDS
|
Line 1879 KEYWORDS
|
| |
|
| # print end of form |
# print end of form |
| if ($counter == $total) { |
if ($counter == $total) { |
| my $endform='<table border="0"><tr><td>'."\n"; |
my $endform=''; |
| |
if (&Apache::lonnet::allowed('vgr',$env{'request.course.id'})) { |
| |
$endform.='<br />'. |
| |
&Apache::loncommon::track_student_link(&mt('View recent activity'),$uname,$udom,'check'); |
| |
} |
| |
if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) { |
| |
$endform.='<br />'. |
| |
&Apache::loncommon::pprmlink(&mt('Set/Change parameters'),$uname,$udom,$symb,'check'); |
| |
} |
| |
$endform.='<table border="0"><tr><td>'."\n"; |
| $endform.='<input type="button" value="Save & Next" '. |
$endform.='<input type="button" value="Save & Next" '. |
| 'onClick="javascript:checksubmit(this.form,\'Save & Next\','. |
'onClick="javascript:checksubmit(this.form,\'Save & Next\','. |
| $total.','.scalar(@partlist).');" TARGET=_self> '."\n"; |
$total.','.scalar(@partlist).');" TARGET=_self> '."\n"; |
|
Line 1980 sub processHandGrade {
|
Line 1989 sub processHandGrade {
|
| $msgstatus = &Apache::lonmsg::user_normal_msg ($uname,$udom, |
$msgstatus = &Apache::lonmsg::user_normal_msg ($uname,$udom, |
| $env{'form.msgsub'}.' ['. |
$env{'form.msgsub'}.' ['. |
| &Apache::lonnet::declutter($url).']',$message); |
&Apache::lonnet::declutter($url).']',$message); |
| |
$request->print('<br />'.&mt('Sending message to [_1]@[_2]',$uname,$udom).': '. |
| |
$msgstatus); |
| } |
} |
| if ($env{'form.collaborator'.$ctr}) { |
if ($env{'form.collaborator'.$ctr}) { |
| my @collabstrs=&Apache::loncommon::get_env_multiple("form.collaborator$ctr"); |
my @collabstrs=&Apache::loncommon::get_env_multiple("form.collaborator$ctr"); |
![[BACK]](/icons/back.gif){kind=icon}
Return to grades.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework