Index: openacs-4/packages/chat/www/index-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index-postgresql.xql,v
diff -u -r1.6.4.2 -r1.6.4.3
--- openacs-4/packages/chat/www/index-postgresql.xql	2 May 2023 08:00:33 -0000	1.6.4.2
+++ openacs-4/packages/chat/www/index-postgresql.xql	6 Jun 2023 12:07:06 -0000	1.6.4.3
@@ -6,13 +6,16 @@
   <querytext>
   select
     rm.room_id, rm.pretty_name, rm.description, rm.active_p, rm.archive_p
-  from
-    acs_permission.permission_p_recursive_array(array(
-       select object_id from acs_objects where package_id = :package_id
-    ), :user_id, 'chat_read') p
-  join chat_rooms rm on (p.orig_object_id = rm.room_id)
-  order by rm.pretty_name
+    from
+    chat_rooms rm,
+    (select distinct orig_object_id
+       from acs_permission.permission_p_recursive_array(array(
+          select object_id from acs_objects where package_id = :package_id
+         ), :user_id, 'chat_read')
+     ) p
+    where p.orig_object_id = rm.room_id
+   order by rm.pretty_name
   </querytext>
 </fullquery>
 
-</queryset>
\ No newline at end of file
+</queryset>