--- loncom/interface/lonmenu.pm 2008/12/04 13:41:37 1.247 +++ loncom/interface/lonmenu.pm 2008/12/09 04:49:01 1.249 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.247 2008/12/04 13:41:37 harmsja Exp $ +# $Id: lonmenu.pm,v 1.249 2008/12/09 04:49:01 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1105,7 +1105,6 @@ sub inlinemenu { } foreach my $item (sort(keys(%active))) { $output.=$inlineremote[$item]; - &Apache::lonnet::logthis("item=$item output=$inlineremote[$item]"); } $output.=''; $output.=''; @@ -1225,6 +1224,18 @@ sub rawconfig { } } } + } elsif ($pro eq 'tools') { + my @tools = ('aboutme','blog','portfolio'); + if (grep(/^\Q$prt\E$/,@tools)) { + if (!&Apache::lonnet::usertools_access($env{'user.name'}, + $env{'user.domain'},$prt)) { + $output.=&clear($row,$col); + next; + } + } + $prt='any'; + $output.=&secondlevel( + $uname,$udom,$rol,$crs,$pub,$con,$row,$col,$prt,$img,$top,$bot,$act,$desc,$cat); } } unless (($env{'browser.interface'} eq 'textual') ||