Index: openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/Attic/xotcl-chat-procs.tcl,v diff -u -r1.1.2.11 -r1.1.2.12 --- openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl 17 Mar 2020 14:14:36 -0000 1.1.2.11 +++ openacs-4/packages/chat/tcl/xotcl-chat-procs.tcl 3 Jul 2020 08:11:13 -0000 1.1.2.12 @@ -34,7 +34,7 @@ UI: aither the screen name or the person name when the former is missing. - @return a user name + @return a username } { set name [acs_user::get_user_info -user_id $user_id -element screen_name] if {$name eq ""} { @@ -87,7 +87,7 @@ approved_p {boolean default true} creation_user {integer references parties(party_id) on delete cascade not null} creation_ip {varchar(50)} - creation_date {timestamp with time zone} + creation_date {timestamp with timezone} } ::xo::db::chat_room ad_instproc grant_creator {} {