--- loncom/interface/lonindexer.pm 2007/06/28 22:28:22 1.165 +++ loncom/interface/lonindexer.pm 2007/06/29 19:21:15 1.166 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.165 2007/06/28 22:28:22 banghart Exp $ +# $Id: lonindexer.pm,v 1.166 2007/06/29 19:21:15 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -918,7 +918,11 @@ sub display_line { # display file if (($fnptr == 0 and $filecom[3] ne '') or $absolute) { + my $title; my $filelink = $pathprefix.$filecom[0]; + if ($hash{'display_attrs_0'} == 1) { + my $title = &Apache::lonnet::gettitle($filelink,'title'); + } my @file_ext = split (/\./,$listname); my $curfext = $file_ext[-1]; if (@Omit) { @@ -951,7 +955,7 @@ sub display_line { $r->print(" />\n"); $r->print(""); $hash{"pre_${fnum}_link"}=$filelink; - $hash{"pre_${fnum}_title"}=&Apache::lonnet::gettitle($filelink,'title'); + $hash{"pre_${fnum}_title"}=$title; if (!$hash{"pre_${fnum}_title"}) { $hash{"pre_${fnum}_title"} = 'Untitled'; } @@ -1008,7 +1012,6 @@ sub display_line { } $r->print("\n"); if ($hash{'display_attrs_0'} == 1) { - my $title = &Apache::lonnet::gettitle($filelink,'title'); $r->print(' '.($title eq '' ? ' ' : $title). ' '."\n"); }