loncom/interface/lonannounce.pm - diff

Return to lonannounce.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.44, 2006/01/13 15:28:36	version 1.45, 2006/01/16 21:24:29
Line 106 sub readcalendar {	Line 106 sub readcalendar {
my $realm=&mt('All Resources');	my $realm=&mt('All Resources');
if ($middle=~/^(.+)\_\_\_$all$$/) {	if ($middle=~/^(.+)\_\_\_$all$$/) {
my $map_url=$1;	my $map_url=$1;
	if (!$can_see_hidden && !$navmap) {
	next;
	}
if (!$can_see_hidden) {	if (!$can_see_hidden) {
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);	$realm=&mt('Folder/Map').': '.&Apache::lonnet::gettitle($map_url);
} elsif ($middle) {	} elsif ($middle) {
	if (!$can_see_hidden && !$navmap) {
	next;
	}
if (!$can_see_hidden) {	if (!$can_see_hidden) {
my $res = $navmap->getBySymb($middle);	my $res = $navmap->getBySymb($middle);
if ($res && $res->randomout()) { next; }	if ($res && $res->randomout()) { next; }