--- loncom/interface/lonnavmaps.pm 2004/09/21 19:28:34 1.267.2.7 +++ loncom/interface/lonnavmaps.pm 2004/10/07 19:55:52 1.267.2.8 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.267.2.7 2004/09/21 19:28:34 albertel Exp $ +# $Id: lonnavmaps.pm,v 1.267.2.8 2004/10/07 19:55:52 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1373,37 +1373,16 @@ sub render { } # Check for any unread discussions in all resources. - if (0 && !$args->{'resource_no_folder_link'}) { - my $totdisc = 0; - my $haveDisc = ''; - my @allres=$navmap->retrieveResources(); - foreach my $resource (@allres) { - if ($resource->hasDiscussion()) { - my $ressymb; - if ($resource->symb() =~ m-(___adm/\w+/\w+)/(\d+)/bulletinboard$-) { - $ressymb = 'bulletin___'.$2.$1.'/'.$2.'/bulletinboard'; - } else { - $ressymb = $resource->symb(); - } - $haveDisc .= $ressymb.':'; - $totdisc ++; - } - } - if ($totdisc > 0) { - $haveDisc =~ s/:$//; - my %lt = &Apache::lonlocal::texthash( - 'mapr' => 'Mark all posts read', - ); - $result .= (<$lt{'mapr'} (Help: NavMaps_MarkPostsLink) + if (!$args->{'resource_no_folder_link'}) { + my $time=time; + my $mapr = &mt('Mark all posts read'); + $result .= (<$mapr (Help: NavMaps_MarkPostsLink)
- +
END - } else { - $result .= '
'; - } } $result .= "
\n"; if ($r) {