loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.181, 2003/06/07 04:08:43	version 1.182, 2003/06/12 22:19:33
Line 43 BEGIN {	Line 43 BEGIN {

sub start_web {	sub start_web {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my $bodytext=&Apache::lonxml::get_all_text("/web",$parser);	if (!($target eq 'web' \|\| $target eq 'edit' \|\| $target eq 'modified' \|\|
if ($target eq 'web') {	$target eq 'answer' \|\| $target eq 'grade' \|\| $target eq 'meta' )) {
return $bodytext;	my $bodytext=&Apache::lonxml::get_all_text("/web",$parser);
}	}
return '';	return '';
}	}
Line 56 sub end_web {	Line 56 sub end_web {

sub start_tex {	sub start_tex {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my $bodytext=&Apache::lonxml::get_all_text("/tex",$parser);	if (!($target eq 'tex' \|\| $target eq 'edit' \|\| $target eq 'modified' \|\|
if ($target eq 'tex') {	$target eq 'answer' \|\| $target eq 'grade' \|\| $target eq 'meta' )) {
return $bodytext.' ';	&Apache::lonxml::debug("tex 1");
	my $bodytext=&Apache::lonxml::get_all_text("/tex",$parser);
}	}
return '';	return '';
}	}