|
version 1.49, 2001/01/30 21:01:36
|
version 1.50, 2001/02/13 00:13:47
|
|
Line 378 sub handler {
|
Line 378 sub handler {
|
| |
|
| $request->print('<body bgcolor="#FFFFFF">'."\n"); |
$request->print('<body bgcolor="#FFFFFF">'."\n"); |
| |
|
| my $file = "/home/httpd/html".$request->uri; |
my $file=&Apache::lonnet::filelocation("",$request->uri); |
| my %mystyle; |
my %mystyle; |
| my $result = ''; |
my $result = ''; |
| $result = Apache::lonxml::xmlparse($target, &Apache::lonnet::getfile($file),'',%mystyle); |
my $filecontents=&Apache::lonnet::getfile($file); |
| |
if ($filecontents == -1) { |
| |
&Apache::lonxml::error("<b> Unable to find <i>$file</i></b>"); |
| |
$filecontents=''; |
| |
} else { |
| |
$result = &Apache::lonxml::xmlparse($target,$filecontents,'',%mystyle); |
| |
} |
| $request->print($result); |
$request->print($result); |
| |
|
| |
|
| $request->print('</body>'); |
$request->print('</body>'); |
| $request->print(&Apache::lontexconvert::footer()); |
$request->print(&Apache::lontexconvert::footer()); |
| writeallows($request->uri); |
writeallows($request->uri); |
|
Line 409 sub warning {
|
Line 416 sub warning {
|
| |
|
| 1; |
1; |
| __END__ |
__END__ |
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
| |
|
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml