|
version 1.181.6.1, 2009/12/02 17:46:46
|
version 1.181.6.2, 2009/12/02 18:22:20
|
|
Line 1296 sub showpreview {
|
Line 1296 sub showpreview {
|
| my $output=''; |
my $output=''; |
| my $embstyle=&Apache::loncommon::fileembstyle($curfext); |
my $embstyle=&Apache::loncommon::fileembstyle($curfext); |
| if ($embstyle eq 'ssi') { |
if ($embstyle eq 'ssi') { |
| my $cache=$Apache::lonnet::perlvar{'lonDocRoot'}.$filelink. |
my $cache = $Apache::lonnet::perlvar{'lonDocRoot'}.$filelink; |
| '.tmp'; |
if ($env{'request.gcicontext'} eq 'buildtest') { |
| |
$cache .= '.tn'; |
| |
} else { |
| |
$cache .= '.tmp'; |
| |
} |
| if ((!$env{'form.updatedisplay'}) && |
if ((!$env{'form.updatedisplay'}) && |
| (-e $cache)) { |
(-e $cache)) { |
| open(FH,$cache); |
open(FH,$cache); |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonindexer.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface