--- loncom/interface/lonindexer.pm 2005/06/17 18:18:38 1.134 +++ loncom/interface/lonindexer.pm 2005/07/08 10:39:49 1.136 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.134 2005/06/17 18:18:38 www Exp $ +# $Id: lonindexer.pm,v 1.136 2005/07/08 10:39:49 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -829,7 +829,7 @@ sub display_line { $r->print ('print (' name="'.$msg.'" height="22" type="image" border="0" />'. "\n"); - $r->print(&mt("Up")." $tabtag\n"); + $r->print(&mt("Up")."$tabtag\n"); return OK; } # Do we have permission to look at this? @@ -863,7 +863,7 @@ sub display_line { $r->print("(".$Apache::lonnet::domaindescription{$listname}. ")"); } - $r->print (" $tabtag\n"); + $r->print ("$tabtag\n"); return OK; # display user directory @@ -928,8 +928,7 @@ sub display_line { $r->print("checked"); } $r->print(" />\n"); - $r->print("\n"); - $r->print(""); + $r->print(""); $hash{"pre_${fnum}_link"}=$filelink; $fnum++; } @@ -1074,9 +1073,13 @@ sub display_line { close(FH); } else { $output=&Apache::lonnet::ssi_body($filelink); - open(FH,">$cache"); - print FH $output; - close(FH); + if ($output=~/LONCAPAACCESSCONTROLERRORSCREEN/) { + $output=''; + } else { + open(FH,">$cache"); + print FH $output; + close(FH); + } } $output=''.$output.''; } elsif ($embstyle eq 'img') {