loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.277, 2003/09/15 13:38:19	version 1.279, 2003/09/19 20:29:29
Line 175 sub xmlbegin {	Line 175 sub xmlbegin {
}	}

sub xmlend {	sub xmlend {
	my $mode='xml';
	my $status='OPEN';
	if ($Apache::lonhomework::parsing_a_problem) {
	$mode='problem';
	$status=$Apache::inputtags::status[-1];
	}
return &Apache::lonfeedback::list_discussion().'</html>';	return &Apache::lonfeedback::list_discussion().'</html>';
}	}

Line 485 sub inner_xmlparse {	Line 491 sub inner_xmlparse {
}	}

# Encode any high ASCII characters	# Encode any high ASCII characters
if (!$Apache::lonxml::prevent_entity_encode) {	# if (!$Apache::lonxml::prevent_entity_encode) {
$result=&HTML::Entities::encode($result,"\200-\377");	# $result=&HTML::Entities::encode($result,"\200-\377");
}	# }
if ($Apache::lonxml::redirection) {	if ($Apache::lonxml::redirection) {
$Apache::lonxml::outputstack['-1'] .= $result;	$Apache::lonxml::outputstack['-1'] .= $result;
} else {	} else {