--- loncom/interface/lonmenu.pm	2008/12/17 13:02:37	1.250
+++ loncom/interface/lonmenu.pm	2009/02/08 20:50:19	1.251
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.250 2008/12/17 13:02:37 harmsja Exp $
+# $Id: lonmenu.pm,v 1.251 2009/02/08 20:50:19 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1228,7 +1228,22 @@ sub rawconfig {
             my @tools = ('aboutme','blog','portfolio');
             if (grep(/^\Q$prt\E$/,@tools)) {
                 if (!&Apache::lonnet::usertools_access($env{'user.name'},
-                                                       $env{'user.domain'},$prt)) {
+                                                       $env{'user.domain'},
+                                                       $prt,undef,'tools')) {
+                    $output.=&clear($row,$col);
+                    next;
+                }
+            } elsif ($prt eq 'reqcrs') {
+                my $showreqcrs = 0;
+                foreach my $type ('official','unofficial') {
+                    if (&Apache::lonnet::usertools_access($env{'user.name'},
+                                                    $env{'user.domain'},
+                                                    $type,undef,'requestcourses')) {
+                        $showreqcrs = 1;
+                        last;
+                    }
+                }
+                if (!$showreqcrs) {
                     $output.=&clear($row,$col);
                     next;
                 }