--- loncom/interface/lonindexer.pm 2007/06/28 21:42:49 1.164 +++ loncom/interface/lonindexer.pm 2007/06/28 22:28:22 1.165 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.164 2007/06/28 21:42:49 banghart Exp $ +# $Id: lonindexer.pm,v 1.165 2007/06/28 22:28:22 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -410,8 +410,8 @@ ENDHEADER # sorting through the actions and changing the global database hash foreach my $key (sort {$achash{$a}<=>$achash{$b}} (keys %ahash)) { if ($ahash{$key} eq '1') { - $hash{'store_'.$hash{'pre_'.$key.'_link'}}=1; - # $hash{'pre_'.$key.'_title'}; + $hash{'store_'.$hash{'pre_'.$key.'_link'}}= + $hash{'pre_'.$key.'_title'}; $hash{'storectr_'.$hash{'pre_'.$key.'_link'}}= $hash{'storectr'}+0; $hash{'storectr'}++; @@ -951,6 +951,10 @@ sub display_line { $r->print(" />\n"); $r->print(""); $hash{"pre_${fnum}_link"}=$filelink; + $hash{"pre_${fnum}_title"}=&Apache::lonnet::gettitle($filelink,'title'); + if (!$hash{"pre_${fnum}_title"}) { + $hash{"pre_${fnum}_title"} = 'Untitled'; + } $fnum++; } # Form to open or close sequences