--- loncom/interface/lonmenu.pm 2007/04/13 02:03:54 1.212 +++ loncom/interface/lonmenu.pm 2007/04/13 20:22:15 1.214 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.212 2007/04/13 02:03:54 www Exp $ +# $Id: lonmenu.pm,v 1.214 2007/04/13 20:22:15 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -842,6 +842,9 @@ sub switch { } } else { # Inline Remote + if ($env{'environment.icons'} ne 'classic') { + $img=~s/\.gif$/\.png/; + } if ($nobreak==2) { return ''; } my $text=$top.' '.$bot; $text=~s/\s*\-\s*//gs; @@ -907,13 +910,13 @@ sub inlinemenu { undef(@inlineremote); undef(%category_members); &rawconfig(1); - my $output=''; + my $output='
'; for (my $col=1; $col<=2; $col++) { - $output.='
'; + $output.=''; for (my $row=1; $row<=8; $row++) { foreach my $cat (keys(%category_members)) { if ($category_positions{$cat} ne "$col,$row") { next; } - $output.=''; + $output.='
'.&mt($category_names{$cat}).'
'; my %active=(); foreach my $menu_item (split(/\:/,$category_members{$cat})) { if ($inlineremote[$menu_item]) {
'.&mt($category_names{$cat}).'