version 1.69, 2005/11/15 22:19:57
|
version 1.70, 2006/03/09 01:07:04
|
Line 80 sub end_essayresponse {
|
Line 80 sub end_essayresponse {
|
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $part = $Apache::inputtags::part; |
my $part = $Apache::inputtags::part; |
my $id = $Apache::inputtags::response[-1]; |
my $id = $Apache::inputtags::response[-1]; |
my $increment = 1; |
my $increment = &Apache::response::repetition(); |
my $result; |
my $result; |
if ( $target eq 'grade' ) { |
if ( $target eq 'grade' ) { |
my $collaborators = $env{'form.HWCOL'.$part.'_'.$id}; |
my $collaborators = $env{'form.HWCOL'.$part.'_'.$id}; |
Line 142 sub end_essayresponse {
|
Line 142 sub end_essayresponse {
|
$result.= '\end{enumerate}'; |
$result.= '\end{enumerate}'; |
$increment=$repetition; |
$increment=$repetition; |
} |
} |
|
} elsif ($target eq 'answer') { |
|
$result.=&Apache::response::answer_header($$tagstack[-1]); |
|
$result.=&Apache::response::answer_part($$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') { |