--- loncom/interface/lonindexer.pm 2009/12/07 02:27:25 1.203.2.1
+++ loncom/interface/lonindexer.pm 2010/03/29 22:42:58 1.204
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Directory Indexer
#
-# $Id: lonindexer.pm,v 1.203.2.1 2009/12/07 02:27:25 raeburn Exp $
+# $Id: lonindexer.pm,v 1.204 2010/03/29 22:42:58 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1223,11 +1223,11 @@ $r->print ('print (''
- .''.
- "\n");
+ $r->print (''
+ .''
+ ."\n");
$r->print ("$listname\n");
# Attributes
my $filelink = $startdir.$filecom[0].'/default';
@@ -1332,12 +1332,8 @@ sub showpreview {
my $output='';
my $embstyle=&Apache::loncommon::fileembstyle($curfext);
if ($embstyle eq 'ssi') {
- my $cache = $Apache::lonnet::perlvar{'lonDocRoot'}.$filelink;
- if ($env{'request.gcicontext'} eq 'buildtest') {
- $cache .= '.tn';
- } else {
- $cache .= '.tmp';
- }
+ my $cache=$Apache::lonnet::perlvar{'lonDocRoot'}.$filelink.
+ '.tmp';
if ((!$env{'form.updatedisplay'}) &&
(-e $cache)) {
open(FH,$cache);