@room_name@

Index: openacs-4/packages/chat/www/html-chat-script-form.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script-form.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script-form.adp 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,55 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Index: openacs-4/packages/chat/www/html-chat-script-form.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script-form.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script-form.tcl 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,34 @@ +ad_page_contract { + + mostra mensagens do chat + + @author TEKNE (tekne@teknedigital.com.br) + @creation-date 2005-03-09 + +} { +room_id:integer +} + +set user_id [ad_conn user_id] + +set read_p [ad_permission_p $room_id "chat_read"] +set write_p [ad_permission_p $room_id "chat_write"] +set ban_p [ad_permission_p $room_id "chat_ban"] +set active [room_active_status $room_id] + + +if { ($read_p == "0" && $write_p == "0") || ($ban_p == "1") || ($active == "f") } { + #Display unauthorize privilege page. + ad_returnredirect unauthorized + ad_script_abort +} + + + +if { [catch {set room_name [chat_room_name $room_id]} errmsg] } { + ad_return_complaint 1 "[_ chat.Room_not_found]" +} + +set context_bar "[list $room_name]" + +ad_return_template \ No newline at end of file Index: openacs-4/packages/chat/www/html-chat-script-msg.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script-msg.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script-msg.adp 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,17 @@ + + + + + + + + + + + + + + + + + Index: openacs-4/packages/chat/www/html-chat-script-msg.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script-msg.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script-msg.tcl 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,29 @@ +ad_page_contract { +mostra mensagens do chat +} { + +room_id:integer + +} + + +# ns_log notice $room_id:onevalue +template::list::create -name chat_msg \ + -multirow chat_msg_query \ + -no_data "Sem dados no momento " \ + -page_flush_p 1 \ + -elements { + creation_date { label "[_ chat.date]" } + msg { label "[_ chat.msg]" } + + } + + +db_multirow -extend {} chat_msg_query select_msg_itens { + select to_char(creation_date, 'DD-MM-YYYY hh:mm:ss') as creation_date, + msg + from chat_msgs + where room_id = :room_id + order by msg_id desc + limit 15 } +ad_return_template \ No newline at end of file Index: openacs-4/packages/chat/www/html-chat-script.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script.adp 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,16 @@ + + + @room_name@ + + + + + + + + + + <html> + <body bgcolor=yellow> + Este chat usa frames e requer uma vers�o atualizada do seu navegador. + \ No newline at end of file Index: openacs-4/packages/chat/www/html-chat-script.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat-script.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/html-chat-script.tcl 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,31 @@ +ad_page_contract { +mostra mensagens do chat +} { + page:optional +} -properties { +room_id:onevalue + +} + + + +set user_id [ad_conn user_id] + +set read_p [ad_permission_p $room_id "chat_read"] +set write_p [ad_permission_p $room_id "chat_write"] +set ban_p [ad_permission_p $room_id "chat_ban"] +set active [room_active_status $room_id] + + +if { ($read_p == "0" && $write_p == "0") || ($ban_p == "1") || ($active == "f") } { + #Display unauthorize privilege page. + ad_returnredirect unauthorized + ad_script_abort +} + + +if { [catch {set room_name [chat_room_name $room_id]} errmsg] } { + ad_return_complaint 1 "[_ chat.Room_not_found]" +} + + # ns_log notice "$room_id:onevalue" Index: openacs-4/packages/chat/www/options.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/options.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/options.adp 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,9 @@ + +<master> +<property name="title">Options</property> + +<formtemplate id="options"></formtemplate> \ No newline at end of file Fisheye: Tag 1.5 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/room-edit-2.tcl'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/chat/www/room-edit.postgresql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/room-edit.postgresql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/chat/www/room-edit.postgresql 26 Oct 2006 13:03:59 -0000 1.1 @@ -0,0 +1,31 @@ +<?xml version="1.0"?> + +<queryset> +<rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="edit-room"> + <querytext> + select rm.room_id, + rm.pretty_name as Epretty_name, + rm.description as Edescription, + rm.moderated_p as Emoderated_p, + rm.active_p as Eactive_p, + rm.archive_p as Earchive_p, + rm.rss_service as Erss_service, + rm.mail_service as Email_service, + rm.end_date as Eend_�date, + rm.maximal_participants as Emaximal_participants, + rm.minimal_participants as Eminimal_participants, + rm.key_words as Ekey_words, + (select ru.alias + from chat_registered_users ru + where rm.room_id = ru.room_id + and ru.user_id = :user_id) as Ealias + from chat_rooms rm, + where rm.room_id = :room_id + order by rm.pretty_name + </querytext> +</fullquery> + +</queryset> + Fisheye: Tag 1.6 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/room-entry.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.4 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/room-new-2.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.4 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/room-new.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-grant-2.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-grant-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.4 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-grant.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.3 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-revoke-2.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-revoke-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.6 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-revoke.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.4 refers to a dead (removed) revision in file `openacs-4/packages/chat/www/user-revoke.tcl'. Fisheye: No comparison available. Pass `N' to diff?