--- loncom/interface/lonannounce.pm 2006/05/12 15:53:10 1.53 +++ loncom/interface/lonannounce.pm 2006/06/26 22:31:56 1.55 @@ -1,7 +1,7 @@ # The LearningOnline Network # Announce # -# $Id: lonannounce.pm,v 1.53 2006/05/12 15:53:10 www Exp $ +# $Id: lonannounce.pm,v 1.55 2006/06/26 22:31:56 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -50,7 +50,7 @@ sub editfield { my $enddateform = &Apache::lonhtmlcommon::date_setter('anno', 'enddate', $end); - my $help=&Apache::loncommon::help_open_menu('','Calendar Add Announcement','Calendar_Add_Announcement','',274,'Communication Tools'); + my $help=&Apache::loncommon::help_open_menu('Calendar Add Announcement','Calendar_Add_Announcement',274,'Communication Tools'); my %lt=&Apache::lonlocal::texthash('post' => 'Post Announcement', 'start' => 'Starting date', 'end' => 'Ending date', @@ -82,7 +82,7 @@ sub readcalendar { } my $can_see_hidden = $env{'request.role.adv'}; - my $navmap = Apache::lonnavmaps::navmap->new(); + my $navmap;# = Apache::lonnavmaps::navmap->new(); my %resourcedata= &Apache::lonnet::dump('resourcedata',$coursedom,$coursenum); foreach my $thiskey (sort keys %resourcedata) { @@ -116,7 +116,9 @@ sub readcalendar { my $res = $navmap->getResourceByUrl($map_url); if ($res && $res->randomout()) { next; } } - $realm=&mt('Folder/Map').': '.&Apache::lonnet::gettitle($map_url); + # need to do this looks up in showday or /*cell for speed resaons + #$realm=&mt('Folder/Map').': '.&Apache::lonnet::gettitle($map_url); + $realm=&mt('Folder/Map').': '.$map_url; } elsif ($middle) { if (!$can_see_hidden && !$navmap) { next; @@ -125,7 +127,8 @@ sub readcalendar { my $res = $navmap->getBySymb($middle); if ($res && $res->randomout()) { next; } } - $realm=&mt('Resource').': '.&Apache::lonnet::gettitle($middle); + #$realm=&mt('Resource').': '.&Apache::lonnet::gettitle($middle); + $realm=&mt('Resource').': '.$middle; } my $datetype=''; if ($name eq 'duedate') {