Index: openacs-4/packages/chat/tcl/chat-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/chat-procs-oracle.xql,v diff -u -N -r1.2.8.1 -r1.2.8.2 --- openacs-4/packages/chat/tcl/chat-procs-oracle.xql 2 Jul 2016 10:41:20 -0000 1.2.8.1 +++ openacs-4/packages/chat/tcl/chat-procs-oracle.xql 28 Oct 2016 18:57:36 -0000 1.2.8.2 @@ -8,16 +8,17 @@ begin :1 := chat_room.new ( - pretty_name => :pretty_name, - moderated_p => :moderated_p, - description => :description, - active_p => :active_p, - archive_p => :archive_p, - context_id => :context_id, - creation_user => :creation_user, - creation_ip => :creation_ip + pretty_name => :pretty_name, + moderated_p => :moderated_p, + description => :description, + active_p => :active_p, + login_messages_p => :login_messages_p, + logout_messages_p => :logout_messages_p, + archive_p => :archive_p, + context_id => :context_id, + creation_user => :creation_user, + creation_ip => :creation_ip ); - end; @@ -47,7 +48,7 @@ select pretty_name from chat_rooms where room_id = :room_id - + @@ -107,14 +108,16 @@ begin chat_room.edit ( - room_id => :room_id, - pretty_name => :pretty_name, - description => :description, - moderated_p => :moderated_p, - active_p => :active_p, - archive_p => :archive_p, - auto_flush_p => :auto_flush_p, - auto_transcript_p => :auto_transcript_p + room_id => :room_id, + pretty_name => :pretty_name, + description => :description, + moderated_p => :moderated_p, + active_p => :active_p, + archive_p => :archive_p, + auto_flush_p => :auto_flush_p, + auto_transcript_p => :auto_transcript_p, + login_messages_p => :login_messages_p, + logout_messages_p => :logout_messages_p ); end;