Return to lonmenu.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.291, 2009/10/16 23:35:08 | version 1.292, 2009/10/17 01:04:56 |
---|---|
Line 185 sub primary_menu { | Line 185 sub primary_menu { |
} else { | } else { |
if (ref($menuitem) eq 'ARRAY') { | if (ref($menuitem) eq 'ARRAY') { |
my @items = @{$menuitem}; | my @items = @{$menuitem}; |
$items[0] = 'javascript:'.$menuitem; | $items[0] = 'javascript:'.$menuitem->[0].';'; |
$menu .= &prep_menuitem(\@items); | $menu .= &prep_menuitem(\@items); |
} | } |
} | } |