version 1.135, 2005/06/17 20:15:51
|
version 1.137, 2005/11/14 23:17:12
|
Line 347 END
|
Line 347 END
|
} |
} |
|
|
# ---------------------------------------------------------------- Print Header |
# ---------------------------------------------------------------- Print Header |
my $html='<html>';#&Apache::lonxml::xmlbegin(); |
my $html=&Apache::lonxml::xmlbegin(); |
$r->print(<<ENDHEADER); |
$r->print(<<ENDHEADER); |
$html |
$html |
<head> |
<head> |
Line 1073 sub display_line {
|
Line 1073 sub display_line {
|
close(FH); |
close(FH); |
} else { |
} else { |
$output=&Apache::lonnet::ssi_body($filelink); |
$output=&Apache::lonnet::ssi_body($filelink); |
open(FH,">$cache"); |
if ($output=~/LONCAPAACCESSCONTROLERRORSCREEN/) { |
print FH $output; |
$output=''; |
close(FH); |
} else { |
|
open(FH,">$cache"); |
|
print FH $output; |
|
close(FH); |
|
} |
} |
} |
$output='<font size="-2">'.$output.'</font>'; |
$output='<font size="-2">'.$output.'</font>'; |
} elsif ($embstyle eq 'img') { |
} elsif ($embstyle eq 'img') { |