loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

-version 1.239.4.1, 2008/12/13 15:51:51
+version 1.239.4.2, 2008/12/13 15:55:40
  Line 1121  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') ||