--- loncom/interface/lonmenu.pm 2007/04/11 02:42:00 1.209 +++ loncom/interface/lonmenu.pm 2007/04/13 02:03:54 1.212 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.209 2007/04/11 02:42:00 www Exp $ +# $Id: lonmenu.pm,v 1.212 2007/04/13 02:03:54 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -445,7 +445,7 @@ sub innerregister { # Finally, turn the button on or off if ($cfile && !$const_space) { $editbutton=&switch - ('','',6,1,'cstr.gif','edit[_1]','resource[_2]', + ('','',6,1,'pcstr.gif','edit[_1]','resource[_2]', "go('".$cfile."');","Edit this resource"); } elsif ($editbutton eq '') { $editbutton=&clear(6,1); @@ -904,10 +904,8 @@ sub openmenu { } sub inlinemenu { - @inlineremote=(); - undef @inlineremote; - %category_members=(); - undef %category_members; + undef(@inlineremote); + undef(%category_members); &rawconfig(1); my $output=''; for (my $col=1; $col<=2; $col++) { @@ -967,6 +965,7 @@ sub rawconfig { $prt=~s/\$udom/$udom/g; $prt=~s/\$crs/$crs/g; $prt=~s/\$requested_domain/$requested_domain/g; + if ($category_names{$cat}!~/\w/) { $cat='oth'; } my $type = &Apache::loncommon::course_type(); if ($type eq 'Group') { $desc = &convert_menu_function($desc,$type);