Index: openacs-4/packages/dotlrn/tcl/navigation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/navigation-procs.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/dotlrn/tcl/navigation-procs.tcl	15 Jul 2002 13:08:31 -0000	1.11
+++ openacs-4/packages/dotlrn/tcl/navigation-procs.tcl	15 Jul 2002 16:18:08 -0000	1.12
@@ -118,10 +118,9 @@
         set link_all 0
     
         if {[empty_string_p $community_id]} {
-            #
-            # We are not under a dotlrn community. However we could be under /dotlrn
-            # (i.e. in the user's portal) or anywhere else on the site
-            #
+            # We are not under a dotlrn community. However we could be
+            # under /dotlrn (i.e. in the user's portal) or anywhere
+            # else on the site
             set link "[dotlrn::get_url]/"
             
             if {[dotlrn::user_p -user_id $user_id]} {
@@ -132,6 +131,7 @@
             } else {
                 # not a dotlrn user, so no user portal to show
                 set portal_id {}
+                set show_control_panel 0
             }
 
         } else {