Index: openacs.org-dev/www/templates/community-index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/www/templates/community-index.tcl,v
diff -u -r1.6 -r1.7
--- openacs.org-dev/www/templates/community-index.tcl	31 Jul 2002 10:56:06 -0000	1.6
+++ openacs.org-dev/www/templates/community-index.tcl	31 Jul 2002 11:16:34 -0000	1.7
@@ -55,8 +55,9 @@
 db_multirow forums forums_select {
     select forum_id, name as short_name, posting_policy, charter
       from forums_forums f
-      where enabled_p = 't'
---      acs_permission__permission_p(forum_id,:user_id,'forum_read') = 't'
+      where
+      acs_permission__permission_p(forum_id,:user_id,'forum_read') = 't'
+      and enabled_p = 't'
       and package_id = 3061
     order by name
 }
\ No newline at end of file