ad_page_contract {
  a tiny chat client

  @author Gustaf Neumann (gustaf.neumann@wu-wien.ac.at)
  @creation-date Jan 31, 2006
  @cvs-id $Id: ajax-chat-script.tcl,v 1.3.2.1 2007/07/03 07:49:51 avni Exp $
} -query {
  msg:optional
}

set chat_frame [ ::chat::Chat login -chat_id $room_id]

