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.1 -r1.2
--- openacs.org-dev/www/templates/community-index.tcl	12 Jul 2002 11:47:44 -0000	1.1
+++ openacs.org-dev/www/templates/community-index.tcl	12 Jul 2002 18:52:22 -0000	1.2
@@ -34,18 +34,27 @@
 set jobs_limit  [expr $n_jobs + 1]
 set companies_limit  [expr $n_companies + 1]
 
-etp::get_content_items -package_id 2680 -result_name sites -limit $sites_limit
-etp::get_content_items -package_id 2692 -result_name jobs -limit $jobs_limit
-etp::get_content_items -package_id 2803 -result_name companies -limit $companies_limit
+etp::get_content_items -package_id 3887 -result_name sites -limit $sites_limit
+etp::get_content_items -package_id 3886 -result_name jobs -limit $jobs_limit
+etp::get_content_items -package_id 3904 -result_name companies -limit $companies_limit
 
 
 
+#db_multirow forums forums_select {
+#    select forum_id, short_name, moderated_p, charter
+#      from bboard_forums f
+#      where 
+#      acs_permission__permission_p(forum_id,:user_id,'bboard_read_forum') = 't'
+#      and bboard_id = 2369
+#    order by short_name
+#}
+
+# olah 
 db_multirow forums forums_select {
-    select forum_id, short_name, moderated_p, charter
-      from bboard_forums f
+    select forum_id, name as short_name, posting_policy, charter
+      from forums_forums f
       where 
-      acs_permission__permission_p(forum_id,:user_id,'bboard_read_forum') = 't'
-      and bboard_id = 2369
-    order by short_name
-}
-
+      acs_permission__permission_p(forum_id,:user_id,'forum_read') = 't'
+      and package_id = 3059
+    order by name
+}
\ No newline at end of file