|
version 1.528.2.12, 2009/03/21 20:02:28
|
version 1.528.2.14, 2009/06/17 18:41:31
|
|
Line 2272 KEYWORDS
|
Line 2272 KEYWORDS
|
| '<option>7</option><option>10</option></select>'."\n"; |
'<option>7</option><option>10</option></select>'."\n"; |
| my $nsel = ($env{'form.NTSTU'} ne '' ? $env{'form.NTSTU'} : '1'); |
my $nsel = ($env{'form.NTSTU'} ne '' ? $env{'form.NTSTU'} : '1'); |
| $ntstu =~ s/<option>$nsel</<option selected="selected">$nsel</; |
$ntstu =~ s/<option>$nsel</<option selected="selected">$nsel</; |
| $endform.=&mt('[quant,_1,student]',$ntstu); |
$endform.=&mt('[_1]student(s)',$ntstu); |
| $endform.=' <input type="button" value="'.&mt('Previous').'" '. |
$endform.=' <input type="button" value="'.&mt('Previous').'" '. |
| 'onClick="javascript:checksubmit(this.form,\'Previous\');" target="_self" /> '."\n". |
'onClick="javascript:checksubmit(this.form,\'Previous\');" target="_self" /> '."\n". |
| '<input type="button" value="'.&mt('Next').'" '. |
'<input type="button" value="'.&mt('Next').'" '. |
|
Line 7649 SCANTRONFORM
|
Line 7649 SCANTRONFORM
|
| if ($studentrecord ne $studentdata) { |
if ($studentrecord ne $studentdata) { |
| &Apache::lonxml::clear_problem_counter(); |
&Apache::lonxml::clear_problem_counter(); |
| if (&grade_student_bubbles($r,$uname,$udom,$scan_record,$scancode, |
if (&grade_student_bubbles($r,$uname,$udom,$scan_record,$scancode, |
| \@resources) eq 'ssi_error') { |
@resources) eq 'ssi_error') { |
| $ssi_error = 0; # So end of handler error message does not trigger. |
$ssi_error = 0; # So end of handler error message does not trigger. |
| $r->print("</form>"); |
$r->print("</form>"); |
| &ssi_print_error($r); |
&ssi_print_error($r); |
![[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