Index: openacs-4/packages/chat/www/index-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/chat/www/index-oracle.xql	14 Mar 2006 12:16:09 -0000	1.1
+++ openacs-4/packages/chat/www/index-oracle.xql	3 Sep 2024 15:37:36 -0000	1.2
@@ -1,18 +1,20 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="utf-8"?>
 <queryset>
 <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
 <fullquery name="rooms_list">
   <querytext>
-    select rm.room_id, rm.pretty_name, rm.description, rm.moderated_p, rm.active_p, rm.archive_p,
-    acs_permission.permission_p(room_id, :user_id, 'chat_room_admin') as admin_p,
-	acs_permission.permission_p(room_id, :user_id, 'chat_read') as user_p,           
-    (select site_node.url(site_nodes.node_id)
-                   from site_nodes
-                   where site_nodes.object_id = obj.context_id) as base_url
-    from chat_rooms rm, acs_objects obj
-    where obj.context_id = :package_id
-    and rm.room_id = obj.object_id
+    select rm.room_id,
+           rm.pretty_name,
+           rm.description,
+           rm.moderated_p,
+           rm.active_p,
+           rm.archive_p
+     from chat_rooms rm,
+          acs_objects obj
+    where rm.room_id = obj.object_id
+      and obj.package_id = :package_id
+      and acs_permission.permission_p(rm.room_id, :user_id, 'chat_read')
     order by rm.pretty_name
   </querytext>
 </fullquery>