loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.236, 2008/05/30 20:24:25	version 1.238, 2008/06/13 01:07:50
Line 898 sub switch {	Line 898 sub switch {
$top=&mt($top);	$top=&mt($top);
$bot=&mt($bot);	$bot=&mt($bot);
$desc=&mt($desc);	$desc=&mt($desc);
$img=&mt($img);	if (($env{'environment.remote'} ne 'off') \|\| ($env{'environment.icons'} eq 'classic')) {
	$img=&mt($img);
	}
my $idx=10*$row+$col;	my $idx=10*$row+$col;
$category_members{$cat}.=':'.$idx;	$category_members{$cat}.=':'.$idx;

Line 1473 sub roles_selector {	Line 1474 sub roles_selector {
$role_selector = &jump_to_role($cdom,$cnum);	$role_selector = &jump_to_role($cdom,$cnum);
$role_selector .= '<form name="rolechooser" method="post" action="/adm/roles">	$role_selector .= '<form name="rolechooser" method="post" action="/adm/roles">
<select name="switchrole" onchange="javascript:adhocRole('."'switchrole'".')">';	<select name="switchrole" onchange="javascript:adhocRole('."'switchrole'".')">';
$role_selector .= '<option value="">'.&mt('Switch course role to..').'</option>';	$role_selector .= '<option value="">'.&mt('Switch course role to...').'</option>';
foreach my $role (@roles_order) {	foreach my $role (@roles_order) {
if (defined($courseroles{$role})) {	if (defined($courseroles{$role})) {
$role_selector .= "\n".'<option value="'.$role.'">'.&Apache::lonnet::plaintext($role).'</option>';	$role_selector .= "\n".'<option value="'.$role.'">'.&Apache::lonnet::plaintext($role).'</option>';