chat_room_new (public, deprecated)

 chat_room_new [ -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 ] \
    [ -messages_time_window messages_time_window ] \
    [ -context_id context_id ] [ -creation_user creation_user ] \
    [ -creation_ip creation_ip ] [ -avatar_p avatar_p ] pretty_name

Defined in packages/chat/tcl/chat-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Create new chat room. Return room_id if successful else raise error.

-description (optional)
-moderated_p (defaults to "f") (optional)
-active_p (defaults to "t") (optional)
-archive_p (defaults to "f") (optional)
-auto_flush_p (defaults to "t") (optional)
-auto_transcript_p (defaults to "f") (optional)
-login_messages_p (defaults to "t") (optional)
-logout_messages_p (defaults to "t") (optional)
-messages_time_window (defaults to "600") (optional)
-context_id (optional)
-creation_user (optional)
-creation_ip (optional)
-avatar_p (defaults to "t") (optional)

See Also:
  • xo::db::chat_room

Partial Call Graph (max 5 caller/called nodes):
%3 ad_get_tcl_call_stack ad_get_tcl_call_stack (public) chat_room_new chat_room_new chat_room_new->ad_get_tcl_call_stack

No testcase defined.
Source code:
ns_log Notice "Deprecated proc chat_room_new used:\n[ad_get_tcl_call_stack]"

    set r [::xo::db::chat_room new  -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  -messages_time_window $messages_time_window  -avatar_p             $avatar_p  -pretty_name          $pretty_name]
    $r set context_id    $context_id
    $r set creation_user $creation_user
    $r set creation_ip   $creation_ip
    return [$r save_new]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: