Index: openacs-4/packages/chat/chat.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/chat.info,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/chat/chat.info 14 Dec 2010 15:04:43 -0000 1.16
+++ openacs-4/packages/chat/chat.info 27 Apr 2015 07:12:55 -0000 1.17
@@ -7,16 +7,16 @@
f
f
-
+
Peter Alberer
Server based chat with an html and ajax client.
- 2006-04-11
+ 2015-04-25
OpenACS
Adapted by Peter Alberer 2006/03/25 to allow java and ajax to coexist.
Adapted by Tekne 2006/03/01 to replace JAVA server with AJAX; make use of generalized chat class from xotcl-core.
0
-
+
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.5 -r1.6
--- openacs-4/packages/chat/www/index-postgresql.xql 19 Nov 2007 01:14:16 -0000 1.5
+++ openacs-4/packages/chat/www/index-postgresql.xql 27 Apr 2015 07:12:55 -0000 1.6
@@ -5,22 +5,25 @@
- select rm.room_id,
+ select room_id, pretty_name, description, moderated_p, active_p, archive_p,
+ acs_permission__permission_p(chats.room_id, :user_id, 'chat_room_admin') as admin_p,
+ acs_permission__permission_p(chats.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 = chats.context_id) as base_url,
+ msg_count
+ from (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 rm.room_id = obj.object_id
- and obj.context_id = :package_id
- order by rm.pretty_name
+ obj.context_id,
+ count(msg.msg_id) AS msg_count
+ from chat_rooms rm LEFT JOIN chat_msgs msg USING(room_id), acs_objects obj
+ where rm.room_id = obj.object_id and obj.context_id = :package_id
+ GROUP BY rm.room_id, rm.pretty_name, rm.description, rm.moderated_p, rm.active_p, rm.archive_p, obj.context_id
+ order by rm.pretty_name
+ ) chats