loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.27, 2000/10/11 21:12:42	version 1.28, 2000/10/12 19:43:25
Line 304 sub handler {	Line 304 sub handler {
}	}
$request->send_http_header;	$request->send_http_header;

return OK if $request->header_only;	return 'OK' if $request->header_only;

$request->print(&Apache::lontexconvert::header());	$request->print(&Apache::lontexconvert::header());

$request->print($headerstring.'<body bgcolor="#FFFFFF">'."\n");	$request->print('<body bgcolor="#FFFFFF">'."\n");

my $file = "/home/httpd/html".$request->uri;	my $file = "/home/httpd/html".$request->uri;
my %mystyle;	my %mystyle;
my $result = '';	my $result = '';
$result = Apache::lonxml::xmlparse($target, &Apache::lonnet::getfile($file),'',%mystyle);	$result = Apache::lonxml::xmlparse($target, &Apache::lonnet::getfile($file),'',%mystyle);
$request->print($result);	$request->print($result);
$r->print('</body>');	$request->print('</body>');
$r->print(&Apache::lontexconvert::footer());	$request->print(&Apache::lontexconvert::footer());
return OK;	return 'OK';
}	}

$Apache::lonxml::debug=0;	$Apache::lonxml::debug=0;