loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.407, 2013/01/03 20:16:22	version 1.409, 2013/01/07 22:36:11
Line 1672 sub roles_selector {	Line 1672 sub roles_selector {
}	}
}	}
}	}
if ($crstype eq 'Community') {	$switchtext = &mt('Switch role');
$switchtext = &mt('Switch community role')
} else {
$switchtext = &mt('Switch course role')
}
my @roles_order = ($ccrole,'in','ta','ep','ad','st');	my @roles_order = ($ccrole,'in','ta','ep','ad','st');
my $numdiffsec;	my $numdiffsec;
if (keys(%seccount) == 1) {	if (keys(%seccount) == 1) {
Line 2002 sub countdown_timer {	Line 1998 sub countdown_timer {
}	}
my $duedate = &Apache::lonnet::EXT("resource.0.duedate");	my $duedate = &Apache::lonnet::EXT("resource.0.duedate");
my @interval=&Apache::lonnet::EXT("resource.0.interval");	my @interval=&Apache::lonnet::EXT("resource.0.interval");
my $hastimeleft;
if (@interval > 1) {	if (@interval > 1) {
my $first_access=&Apache::lonnet::get_first_access($interval[1]);	my $first_access=&Apache::lonnet::get_first_access($interval[1]);
if ($first_access > 0) {	if ($first_access > 0) {