--- loncom/interface/lonindexer.pm 2005/06/17 20:15:51 1.135 +++ loncom/interface/lonindexer.pm 2006/03/02 20:16:10 1.139 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.135 2005/06/17 20:15:51 www Exp $ +# $Id: lonindexer.pm,v 1.139 2006/03/02 20:16:10 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -347,7 +347,7 @@ END } # ---------------------------------------------------------------- Print Header - my $html='';#&Apache::lonxml::xmlbegin(); + my $html=&Apache::lonxml::xmlbegin(); $r->print(< @@ -1057,6 +1057,7 @@ sub display_line { &dynmetaprint($r,$filelink,'comefrom_list'); &dynmetaprint($r,$filelink,'sequsage_list'); &dynmetaprint($r,$filelink,'dependencies'); + &dynmetaprint($r,$filelink,'course_list'); $r->print(''); } if ($hash{'display_attrs_7'} == 1) { @@ -1073,9 +1074,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') { @@ -1237,6 +1242,7 @@ sub cleanup { if (tied(%hash)){ &Apache::lonnet::logthis('Cleanup indexer: hash'); } + return OK; }