|
version 1.53, 2006/05/12 15:53:10
|
version 1.54, 2006/06/07 22:30:23
|
|
Line 82 sub readcalendar {
|
Line 82 sub readcalendar {
|
| } |
} |
| |
|
| my $can_see_hidden = $env{'request.role.adv'}; |
my $can_see_hidden = $env{'request.role.adv'}; |
| my $navmap = Apache::lonnavmaps::navmap->new(); |
my $navmap;# = Apache::lonnavmaps::navmap->new(); |
| my %resourcedata= |
my %resourcedata= |
| &Apache::lonnet::dump('resourcedata',$coursedom,$coursenum); |
&Apache::lonnet::dump('resourcedata',$coursedom,$coursenum); |
| foreach my $thiskey (sort keys %resourcedata) { |
foreach my $thiskey (sort keys %resourcedata) { |
|
Line 116 sub readcalendar {
|
Line 116 sub readcalendar {
|
| my $res = $navmap->getResourceByUrl($map_url); |
my $res = $navmap->getResourceByUrl($map_url); |
| if ($res && $res->randomout()) { next; } |
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) { |
} elsif ($middle) { |
| if (!$can_see_hidden && !$navmap) { |
if (!$can_see_hidden && !$navmap) { |
| next; |
next; |
|
Line 125 sub readcalendar {
|
Line 127 sub readcalendar {
|
| my $res = $navmap->getBySymb($middle); |
my $res = $navmap->getBySymb($middle); |
| if ($res && $res->randomout()) { next; } |
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=''; |
my $datetype=''; |
| if ($name eq 'duedate') { |
if ($name eq 'duedate') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonannounce.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface