|
version 1.468, 2007/10/26 00:41:31
|
version 1.469, 2007/10/26 20:18:43
|
|
Line 1852 sub submission {
|
Line 1852 sub submission {
|
| $request->print('<h3> <span class="LC_info">Submission Record</span></h3>'."\n". |
$request->print('<h3> <span class="LC_info">Submission Record</span></h3>'."\n". |
| '<h4> <b>Resource: </b>'.$env{'form.probTitle'}.'</h4>'."\n"); |
'<h4> <b>Resource: </b>'.$env{'form.probTitle'}.'</h4>'."\n"); |
| |
|
| if ($env{'form.handgrade'} eq 'no') { |
|
| my $checkMark='<br /><br /> <b>Note:</b> Part(s) graded correct by the computer is marked with a '. |
|
| $checkIcon.' symbol.'."\n"; |
|
| $request->print($checkMark); |
|
| } |
|
| |
|
| # option to display problem, only once else it cause problems |
# option to display problem, only once else it cause problems |
| # with the form later since the problem has a form. |
# with the form later since the problem has a form. |
| if ($env{'form.vProb'} eq 'yes' or $env{'form.vAns'} eq 'yes') { |
if ($env{'form.vProb'} eq 'yes' or $env{'form.vAns'} eq 'yes') { |
|
Line 1989 KEYWORDS
|
Line 1983 KEYWORDS
|
| $result.= &mt('Submissions'); |
$result.= &mt('Submissions'); |
| $result.='<input type="hidden" name="name'.$counter. |
$result.='<input type="hidden" name="name'.$counter. |
| '" value="'.$env{'form.fullname'}.'" />'."\n"; |
'" value="'.$env{'form.fullname'}.'" />'."\n"; |
| |
if ($env{'form.handgrade'} eq 'no') { |
| |
$result.='<span class="LC_grade_check_note">'. |
| |
&mt('Part(s) graded correct by the computer is marked with a [_1] symbol.',$checkIcon)."</span>\n"; |
| |
|
| |
} |
| |
|
| |
|
| |
|
| # If any part of the problem is an essay-response (handgraded), then check for collaborators |
# If any part of the problem is an essay-response (handgraded), then check for collaborators |
| my $fullname; |
my $fullname; |
![[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