Index: openacs-4/packages/chat/tcl/chat-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/chat-procs-postgresql.xql,v
diff -u -r1.6.6.3 -r1.6.6.4
--- openacs-4/packages/chat/tcl/chat-procs-postgresql.xql	22 Nov 2016 18:34:35 -0000	1.6.6.3
+++ openacs-4/packages/chat/tcl/chat-procs-postgresql.xql	23 Nov 2016 19:51:16 -0000	1.6.6.4
@@ -2,75 +2,19 @@
 <queryset>
   <rdbms><type>postgresql</type><version>7.1</version></rdbms>
 
-  <fullquery name="chat_room_new.create_room">
-    <querytext>
-      select chat_room__new (
-      NULL,
-      :pretty_name,
-      :description,
-      :moderated_p,
-      :active_p,
-      :archive_p,
-      :auto_flush_p,
-      :auto_transcript_p,
-      :login_messages_p,
-      :logout_messages_p,	     
-      :context_id,
-      now(),
-      :creation_user,
-      :creation_ip,
-      'chat_room'
-      )
-    </querytext>
-  </fullquery>
-
-  <fullquery name="chat_room_edit.edit_room">
-    <querytext>
-      select chat_room__edit (
-      :room_id,
-      :pretty_name,
-      :description,
-      :moderated_p,
-      :active_p,
-      :archive_p,
-      :auto_flush_p,
-      :auto_transcript_p,
-      :login_messages_p,
-      :logout_messages_p		
-      )
-    </querytext>
-  </fullquery>
-
   <fullquery name="chat_message_count.message_count">
     <querytext>
-      select chat_room__message_count(:room_id)
+      select count(*) from chat_msgs
+       where room_id = :room_id
     </querytext>
   </fullquery>
 
-
   <fullquery name="chat_room_message_delete.delete_message">
     <querytext>
       select chat_room__delete_all_msgs(:room_id)
     </querytext>
   </fullquery>
 
-
-  <fullquery name="chat_transcript_new.create_transcript">
-    <querytext>
-      select chat_transcript__new (
-      :pretty_name,
-      :contents,
-      :description,
-      :room_id,
-      :context_id,
-      now(),
-      :creation_user,
-      :creation_ip,
-      'chat_transcript'
-      )
-    </querytext>
-  </fullquery>
-
   <fullquery name="chat_transcript_delete.delete_transcript">
     <querytext>
       select chat_transcript__del(:transcript_id)
@@ -89,16 +33,4 @@
     </querytext>
   </fullquery>
 
-  <fullquery name="chat_transcript_edit.edit_transcript">
-    <querytext>
-      select chat_transcript__edit (
-      :transcript_id,
-      :pretty_name,
-      :contents,
-      :description
-      )
-    </querytext>
-  </fullquery>
-
 </queryset>
-