Index: openacs-4/packages/dotlrn/www/my-communities.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/my-communities.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/dotlrn/www/my-communities.tcl	21 May 2002 07:46:03 -0000	1.5
+++ openacs-4/packages/dotlrn/www/my-communities.tcl	28 May 2002 21:57:05 -0000	1.6
@@ -26,7 +26,7 @@
 }
 
 set user_id [ad_maybe_redirect_for_registration]
-set user_can_browse_p [dotlrn::user_can_browse_p]
+set user_can_browse_p [dotlrn::user_can_browse_p -user_id $user_id]
 
 if {![info exists referer]} {
     set referer "my-communities"