loncom/interface/lonmainmenu.pm - diff

Return to lonmainmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.8.4.4, 2009/12/08 04:58:14	version 1.8.4.5, 2009/12/15 05:17:52
Line 81 ENDSCRIPT	Line 81 ENDSCRIPT
$switcher_js = &gcitest_switcher_js($current,$numcourses);	$switcher_js = &gcitest_switcher_js($current,$numcourses);
$script_tag= <<"ENDSCRIPT";	$script_tag= <<"ENDSCRIPT";
<script type="text/javascript">	<script type="text/javascript">
	// <![CDATA[

$switcher_js	$switcher_js

	// ]]>
</script>	</script>
ENDSCRIPT	ENDSCRIPT
}	}
Line 132 sub gcitest_switcher {	Line 136 sub gcitest_switcher {
}	}
if ($default) {	if ($default) {
$output = '<form name="pickrole" action="/adm/roles" method="post">'.	$output = '<form name="pickrole" action="/adm/roles" method="post">'.
'<select name="newrole" method="post" onchange="javascript:courseswitcher();">'.	'<select name="newrole" onchange="javascript:courseswitcher();">'.
'<option value="" selected="selected">'.$default.'</option>';	'<option value="" selected="selected">'.$default.'</option>';
foreach my $item (@sorted_courses) {	foreach my $item (@sorted_courses) {
foreach my $course (@{$Sortby{$item}}) {	foreach my $course (@{$Sortby{$item}}) {