Index: openacs-4/packages/chat/www/chat-room-grant.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/chat-room-grant.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/chat-room-grant.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/chat-room-grant.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -16,7 +16,7 @@

Grant permission on $pretty_name

-[ad_context_bar "Grant permission on $pretty_name"] +[list "Grant permission on $pretty_name"]
Index: openacs-4/packages/chat/www/chat.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/chat.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/chat.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -29,7 +29,7 @@ ad_return_complaint "Room not found" "Invalid room id" } -set context_bar [ad_context_bar $room_name] +set context_bar [list $room_name] set user_id [ad_conn user_id] Index: openacs-4/packages/chat/www/grant-entry.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/grant-entry.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/grant-entry.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/grant-entry.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ @title@
Index: openacs-4/packages/chat/www/html-chat.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/html-chat.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/html-chat.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context_bar@ @room_name@ [Log off] Index: openacs-4/packages/chat/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/index.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/index.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Chat main page Index: openacs-4/packages/chat/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/index.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/index.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -16,7 +16,7 @@ set package_id [ad_conn package_id] -set context_bar [ad_context_bar] +set context_bar [list] set user_id [ad_conn user_id] Index: openacs-4/packages/chat/www/java-chat.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/java-chat.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/java-chat.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/java-chat.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context_bar@ @room_name@
Index: openacs-4/packages/chat/www/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/master.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/master.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/master.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -1,9 +1,8 @@ Chat: @title@ +@context@

@title@

- -@context_bar@ - +<%= [eval ad_context_bar $context]%>
Index: openacs-4/packages/chat/www/message-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/message-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/message-delete.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/message-delete.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm message delete Index: openacs-4/packages/chat/www/message-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/message-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/message-delete.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/message-delete.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -16,7 +16,7 @@ ad_require_permission $room_id chat_room_delete -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Delete messages"] +set context_bar [list [list "room?room_id=$room_id" "Room information"] "Delete messages"] set pretty_name [chat_room_name $room_id] Index: openacs-4/packages/chat/www/moderator-grant.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-grant.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/moderator-grant.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/moderator-grant.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -19,7 +19,7 @@ ad_require_permission $room_id chat_moderator_grant -set context_bar [ad_context_bar "Grant moderator"] +set context_bar [list "Grant moderator"] set submit_label "Grant" set title "Grant moderator" set action "moderator-grant-2" Index: openacs-4/packages/chat/www/moderator-revoke.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-revoke.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/moderator-revoke.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/moderator-revoke.adp 4 Sep 2002 08:12:50 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm revoke moderator Index: openacs-4/packages/chat/www/moderator-revoke.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-revoke.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/moderator-revoke.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/moderator-revoke.tcl 4 Sep 2002 08:12:50 -0000 1.2 @@ -13,7 +13,7 @@ ad_require_permission $room_id chat_moderator_revoke -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Revoke moderator"] +set context_bar [list [list "room?room_id=$room_id" "Room information"] "Revoke moderator"] set party_pretty_name [db_string get_party_name "select acs_object.name(:party_id) from dual"] Index: openacs-4/packages/chat/www/room-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room-delete.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room-delete.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm room delete Index: openacs-4/packages/chat/www/room-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room-delete.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room-delete.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -15,7 +15,7 @@ ad_require_permission $room_id chat_room_delete -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Delete room"] +set context_bar [list [list "room?room_id=$room_id" "Room information"] "Delete room"] set pretty_name [chat_room_name $room_id] Index: openacs-4/packages/chat/www/room-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room-edit.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room-edit.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -30,7 +30,7 @@ ad_return_complaint "Room not found" "Room not found." } -set context_bar [ad_context_bar "Edit room '$pretty_name'"] +set context_bar [list "Edit room '$pretty_name'"] set title "Edit room '$pretty_name'" set action "room-edit-2" set submit_label "Update room" Index: openacs-4/packages/chat/www/room-entry.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/room-entry.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room-entry.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room-entry.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ @title@ Index: openacs-4/packages/chat/www/room-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/room-new.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room-new.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room-new.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -18,7 +18,7 @@ ad_require_permission [ad_conn package_id] chat_room_create -set context_bar [ad_context_bar "Create a room"] +set context_bar [list "Create a room"] set title "Create a room" set action "room-new-2" set submit_label "Create room" Index: openacs-4/packages/chat/www/room.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Room Information

Room information

Index: openacs-4/packages/chat/www/room.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/room.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/room.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -33,7 +33,7 @@ chat_transcripts:multirow } -set context_bar [ad_context_bar "Room information"] +set context_bar [list "Room information"] ### Index: openacs-4/packages/chat/www/transcript-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-delete.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-delete.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm chat transcript delete Index: openacs-4/packages/chat/www/transcript-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-delete.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-delete.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -16,5 +16,5 @@ ad_require_permission $transcript_id chat_transcript_delete -set context_bar [ad_context_bar "Delete transcript"] +set context_bar [list "Delete transcript"] ad_return_template Index: openacs-4/packages/chat/www/transcript-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-edit.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-edit.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -21,7 +21,7 @@ } ad_require_permission $transcript_id chat_transcript_edit -set context_bar [ad_context_bar "Edit transcript"] +set context_bar [list "Edit transcript"] set title "Edit transcript" set action "transcript-edit-2" Index: openacs-4/packages/chat/www/transcript-entry.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/transcript-entry.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-entry.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-entry.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ @title@ Index: openacs-4/packages/chat/www/transcript-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-new.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-new.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-new.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -16,7 +16,7 @@ ad_require_permission $room_id chat_transcript_create -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room Information"] "Create transcript"] +set context_bar [list [list "room?room_id=$room_id" "Room Information"] "Create transcript"] set transcript_id "" set transcript_name "Untitled" Index: openacs-4/packages/chat/www/transcript-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/transcript-view.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-view.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-view.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Transcript preview [Edit] Index: openacs-4/packages/chat/www/transcript-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-view.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/transcript-view.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/transcript-view.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -18,7 +18,7 @@ ad_require_permission $transcript_id chat_transcript_view -set context_bar [ad_context_bar "View transcript"] +set context_bar [list "View transcript"] db_1row get_transcript { select pretty_name as transcript_name, description, Index: openacs-4/packages/chat/www/unauthorized.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/unauthorized.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/unauthorized.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/unauthorized.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Unauthorized You don't have permission to enter this chat room. Index: openacs-4/packages/chat/www/unauthorized.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/unauthorized.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/unauthorized.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/unauthorized.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -9,6 +9,6 @@ context_bar:onevalue } -set context_bar [ad_context_bar "Unauthorized privilege"] +set context_bar [list "Unauthorized privilege"] ad_return_template \ No newline at end of file Index: openacs-4/packages/chat/www/user-ban.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-ban.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-ban.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-ban.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -20,7 +20,7 @@ ad_require_permission $room_id chat_user_ban -set context_bar [ad_context_bar "Ban user"] +set context_bar [list "Ban user"] set submit_label "Ban" set title "Ban user" set action "user-ban-2" Index: openacs-4/packages/chat/www/user-grant.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/user-grant.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-grant.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-grant.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -20,7 +20,7 @@ ad_require_permission $room_id chat_user_grant -set context_bar [ad_context_bar "Grant user"] +set context_bar [list "Grant user"] set submit_label "Grant" set title "Grant user" set action "user-grant-2" Index: openacs-4/packages/chat/www/user-revoke.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/user-revoke.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-revoke.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-revoke.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm revoke user Index: openacs-4/packages/chat/www/user-revoke.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/user-revoke.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-revoke.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-revoke.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -13,7 +13,7 @@ ad_require_permission $room_id chat_user_revoke -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Revoke user"] +set context_bar [list [list "room?room_id=$room_id" "Room information"] "Revoke user"] set party_pretty_name [db_string get_party_name "select acs_object.name(:party_id) from dual"] Index: openacs-4/packages/chat/www/user-unban.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-unban.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-unban.adp 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-unban.adp 4 Sep 2002 08:12:51 -0000 1.2 @@ -6,7 +6,7 @@ @cvs-id $Id$ --> -@context_bar@ +@context_bar@ Confirm unban user Index: openacs-4/packages/chat/www/user-unban.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-unban.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/chat/www/user-unban.tcl 20 Apr 2001 20:51:08 -0000 1.1 +++ openacs-4/packages/chat/www/user-unban.tcl 4 Sep 2002 08:12:51 -0000 1.2 @@ -13,7 +13,7 @@ ad_require_permission $room_id chat_user_unban -set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Unban user"] +set context_bar [list [list "room?room_id=$room_id" "Room information"] "Unban user"] set party_pretty_name [db_string get_party_name "select acs_object.name(:party_id) from dual"]