loncom/homework/outputtags.pm - diff

Return to outputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.25, 2003/01/13 21:23:06	version 1.26, 2003/05/02 18:56:29
Line 113 sub start_displayweight {	Line 113 sub start_displayweight {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my $result;	my $result;
if (exists($Apache::outputtags::showonce{'displayweight'})) {	if (exists($Apache::outputtags::showonce{'displayweight'})) {
return '';	if(grep(/^\Q$Apache::inputtags::part\E$/,
} else {	@{$Apache::outputtags::showonce{'displayweight'}})) {
$Apache::outputtags::showonce{'displayweight'}=1;	return '';
	}
}	}
	push(@{$Apache::outputtags::showonce{'displayweight'}},
	$Apache::inputtags::part);
my $status=$Apache::inputtags::status['-1'];	my $status=$Apache::inputtags::status['-1'];
if ($target eq 'web' \|\| $target eq 'tex') {	if ($target eq 'web' \|\| $target eq 'tex') {
my $id = $Apache::inputtags::part;	my $id = $Apache::inputtags::part;