[BACK]Return to essayresponse.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/essayresponse.pm between versions 1.70 and 1.71

version 1.70, 2006/03/09 01:07:04 version 1.71, 2006/03/09 01:11:12
Line 129  sub end_essayresponse { Line 129  sub end_essayresponse {
  }    } 
     } elsif ($target eq 'edit') {      } elsif ($target eq 'edit') {
  $result.=&Apache::edit::end_table();   $result.=&Apache::edit::end_table();
     } elsif ($target eq 'tex') {  
  if ($Apache::lonhomework::type eq 'exam') {      } elsif ($target eq 'tex'
     my $repetition=&Apache::response::repetition();       && $Apache::lonhomework::type eq 'exam') {
     $result.='\begin{enumerate}';   $result .= &Apache::inputtags::exam_score_line($target);
     if ($env{'request.state'} eq "construct" ) {$result.='\item[\strut]';}  
     for (my $i=0;$i<$repetition;$i++) {  
  $result.='\item[\textbf{'.($Apache::lonxml::counter+$i).  
     '}.]\textit{'.&mt('Leave blank on scoring form').  
     '}\vskip 0 mm';  
     }  
     $result.= '\end{enumerate}';  
     $increment=$repetition;  
  }  
     } elsif ($target eq 'answer') {      } elsif ($target eq 'answer') {
  $result.=&Apache::response::answer_header($$tagstack[-1]);   $result.=&Apache::response::answer_header($$tagstack[-1]);
  $result.=&Apache::response::answer_part($$tagstack[-1],'');   $result.=&Apache::response::answer_part($$tagstack[-1],'');
  $result.=&Apache::response::answer_footer($$tagstack[-1]);   $result.=&Apache::response::answer_footer($$tagstack[-1]);
     }      }
   
     if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' ||      if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' ||
  $target eq 'tex' || $target eq 'analyze') {   $target eq 'tex' || $target eq 'analyze') {
  &Apache::lonxml::increment_counter($increment);   &Apache::lonxml::increment_counter($increment);
Removed from v.1.70  
changed lines
  Added in v.1.71

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>