loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.244, 2008/11/19 19:43:08	version 1.245, 2008/12/03 11:48:43
Line 1095 sub inlinemenu {	Line 1095 sub inlinemenu {
foreach my $cat (keys(%category_members)) {	foreach my $cat (keys(%category_members)) {
if ($category_positions{$cat} ne "$col,$row") { next; }	if ($category_positions{$cat} ne "$col,$row") { next; }
#$output.='<table id="LC_menubuttons_mainmenu"><tr><td colspan="4" class="LC_menubuttons_category">'.&mt($category_names{$cat}).'</td></tr>';	#$output.='<table id="LC_menubuttons_mainmenu"><tr><td colspan="4" class="LC_menubuttons_category">'.&mt($category_names{$cat}).'</td></tr>';
$output.='<fieldset id="LC_mainmenu_fieldset">';	$output.='<div class="ContentBoxSpecial">';
$output.='<legend class="LC_mainmenu_fieldset_category">'.&mt($category_names{$cat}).'</legend>';	$output.='<h4 class="hcell">'.&mt($category_names{$cat}).'</h4>';
$output.='<table id="LC_menubuttons_mainmenu">';	$output.='<table id="LC_menubuttons_mainmenu">';
my %active=();	my %active=();
foreach my $menu_item (split(/\:/,$category_members{$cat})) {	foreach my $menu_item (split(/\:/,$category_members{$cat})) {
Line 1109 sub inlinemenu {	Line 1109 sub inlinemenu {
&Apache::lonnet::logthis("item=$item output=$inlineremote[$item]");	&Apache::lonnet::logthis("item=$item output=$inlineremote[$item]");
}	}
$output.='</table>';	$output.='</table>';
$output.='</fieldset>';	$output.='</div>';
}	}
}	}
$output.="</td>";	$output.="</td>";