loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.126, 2002/10/14 20:48:36	version 1.127, 2002/10/15 14:37:59
Line 482 sub end_library {	Line 482 sub end_library {
sub start_block {	sub start_block {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;

if ($target eq 'web' \|\| $target eq 'grade' \|\| $target eq 'answer' \|\| $target eq 'tex' \|\| $targer eq 'analyze') {	if ($target eq 'web' \|\| $target eq 'grade' \|\| $target eq 'answer' \|\| $target eq 'tex' \|\| $target eq 'analyze') {
my $code = @$parstack[$#$parstack];	my $code = @$parstack[$#$parstack];
$code =~ s/\"//g;	$code =~ s/\"//g;
$code .=';return $condition;';	$code .=';return $condition;';