Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.adp 5 Sep 2002 10:41:43 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/index.tcl 5 Sep 2002 10:41:43 -0000 1.2 @@ -9,7 +9,7 @@ } set title "MP3 Jukebox" -set context_bar "" +set context "" set page_title "MP3 Jukebox" set package_id [ad_conn package_id] Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/Attic/master.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/master.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/master.adp 5 Sep 2002 10:41:43 -0000 1.2 @@ -1,7 +1,8 @@ @page_title@ +@context@

@page_title@

-<%= [eval ad_context_bar $context_bar] %> +<%= [eval ad_context_bar $context] %>
Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.adp 5 Sep 2002 10:41:43 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/one-playlist.tcl 5 Sep 2002 10:41:43 -0000 1.2 @@ -13,7 +13,7 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue name:onevalue playlist_mp3s:multirow playlist_info @@ -25,7 +25,7 @@ set title "One Playlist" -set context_bar [list $title] +set context [list $title] set page_title "One Playlist" Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.adp 5 Sep 2002 10:41:43 -0000 1.2 @@ -1,7 +1,7 @@ @page_title@ @page_title@ -@context_bar@ +@context@ Thank you for your vote @vote_words@ @mp3_title@ in playlist @name@.


Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/vote-thankyou.tcl 5 Sep 2002 10:41:43 -0000 1.2 @@ -16,7 +16,7 @@ vote_num:integer,notnull } -properties { - context_bar:onevalue + context:onevalue page_title:onevalue mp3_id:onevalue playlist_id:onevalue @@ -27,7 +27,7 @@ } set title "Thanks for your vote" -set context_bar [list $title] +set context [list $title] set page_title "Thanks for your vote" set remove_p "" Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/file-search.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -25,7 +25,7 @@ set select_sql [mp3_search_select_sql search_string] set title "File Search" -set context_bar [list $title] +set context [list $title] set page_title "File Search" db_multirow mp3s mp3_search "$select_sql" Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/index.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -12,7 +12,7 @@ } set title "MP3 Jukebox Administration" -set context_bar "" +set context "" set page_title "MP3 Jukebox Administration" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/Attic/master.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/master.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/master.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,8 +1,9 @@ @page_title@ +@context@

@page_title@

-<%= [eval ad_context_bar $context_bar] %> +<%= [eval ad_context_bar $context] %>
\ No newline at end of file Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add-2.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -8,11 +8,11 @@ } -properties { sql:onevalue page_title:onevalue - context_bar:onevalue + context:onevalue } set title "Add an MP3" -set context_bar [list $title] +set context [list $title] set page_title "MP3 Added" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-add.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -13,13 +13,13 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue form_action:onevalue hidden_vars:onevalue } set title "Add an MP3" -set context_bar [list $title] +set context [list $title] set page_title "Add an MP3" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/mp3-edit.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -15,7 +15,7 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue form_action:onevalue hidden_vars:onevalue } @@ -25,7 +25,7 @@ set title "Edit an MP3" set page_title "Edit an MP3:$title" -set context_bar [list $page_title] +set context [list $page_title] set form_action mp3-edit-2 set hidden_vars [export_form_vars mp3_id] @@ -38,7 +38,7 @@ } set page_title "Edit MP3:$title" -set context_bar [list $page_title] +set context [list $page_title] set variables_p [list copyright_p stereo_p vbr_p] foreach variable $variables_p { @@ -60,6 +60,6 @@ } set page_title "Edit MP3:$escape_title" -set context_bar [list $page_title] +set context [list $page_title] ad_return_template \ No newline at end of file Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,9 +1,8 @@ -@context_bar@ @page_title@ @title@ +@context@ -

Information for playlist @name@ (edit)

Name: @name@
Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/one-playlist.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -14,7 +14,7 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue name:onevalue playlist_mp3s:multirow playlist_info @@ -36,7 +36,7 @@ " set title "Playlist: $name" -set context_bar [list $title] +set context [list $title] set page_title "Playlist: $name" set package_id [ad_conn package_id] Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/order-choose.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -23,7 +23,7 @@ #requires admin permission as under /admin set title "Choose Order" -set context_bar [list $title] +set context [list $title] set page_title "Order MP3 in Playlist" db_1row playlist_name "select name from mp3_playlists where playlist_id=$playlist_id" Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-create.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -13,13 +13,13 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue form_action:onevalue hidden_vars:onevalue } set title "Create a Playlist" -set context_bar [list $title] +set context [list $title] set page_title "Create a Playlist" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-delete.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -13,13 +13,13 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue playlist_id:onevalue playlist_name:onevalue } set title "Delete a Playlist" -set context_bar [list $title] +set context [list $title] set page_title "Delete a Playlist" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit-2.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit-2.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -16,15 +16,15 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue form_action:onevalue hidden_vars:onevalue name remove_threshold:onevalue } set title "Edit a Playlist" -set context_bar [list $title] +set context [list $title] set page_title "Edit a Playlist" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-edit.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -14,7 +14,7 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue form_action:onevalue hidden_vars:onevalue name @@ -25,7 +25,7 @@ } set title "Edit a Playlist" -set context_bar [list $title] +set context [list $title] set page_title "Edit a Playlist" #requires admin permission as under /admin Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.tcl 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/playlist-item-add.tcl 5 Sep 2002 10:41:44 -0000 1.2 @@ -13,7 +13,7 @@ } -properties { page_title:onevalue - context_bar:onevalue + context:onevalue playlist_id:onevalue name:onevalue } @@ -24,7 +24,7 @@ db_1row playlist_name "select name from mp3_playlists where playlist_id=:playlist_id" set title "Add item to playlist $name" -set context_bar [list $title] +set context [list $title] set page_title "Add item to playlist $name" set hidden_vars [export_form_vars insert_after_id, playlist_id] \ No newline at end of file Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.adp 17 Oct 2001 19:44:08 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.adp 5 Sep 2002 10:41:44 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @page_title@ @title@ Index: openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.tcl 5 Jul 2002 16:32:19 -0000 1.2 +++ openacs-4/contrib/obsolete-packages/mp3-jukebox/www/admin/scanner.tcl 5 Sep 2002 10:41:44 -0000 1.3 @@ -198,4 +198,4 @@ set staging_location [ad_parameter MP3StagingLocation] set page_title "Scanning MP3 Staging Location" set title $page_title -set context_bar [list $title] +set context [list $title] Index: openacs-4/packages/news/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/index.adp,v diff -u -r1.5 -r1.6 --- openacs-4/packages/news/www/index.adp 5 Jul 2002 15:56:53 -0000 1.5 +++ openacs-4/packages/news/www/index.adp 5 Sep 2002 10:49:47 -0000 1.6 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@ Index: openacs-4/packages/news/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/index.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/news/www/index.tcl 25 Oct 2001 12:16:33 -0000 1.4 +++ openacs-4/packages/news/www/index.tcl 5 Sep 2002 10:49:47 -0000 1.5 @@ -17,7 +17,7 @@ title:onevalue - context_bar:onevalue + context:onevalue news_admin_p:onevalue news_create_p:onevalue news_items:multirow @@ -32,7 +32,7 @@ ad_require_permission $package_id news_read -set context_bar {} +set context {} # switches for privilege-enabled links: admin for news_admin, submit for registered users Index: openacs-4/packages/news/www/item-create-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create-3.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/item-create-3.tcl 16 Oct 2001 10:10:19 -0000 1.3 +++ openacs-4/packages/news/www/item-create-3.tcl 5 Sep 2002 10:49:47 -0000 1.4 @@ -20,7 +20,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue } @@ -107,7 +107,7 @@ if { ![string equal "open" [ad_parameter ApprovalPolicy "news" "wait"]] } { # case: user submitted news item, is returned to a Thank-you page set title "News item submitted" - set context_bar [list $title] + set context [list $title] ad_return_template item-create-thankyou } } else { Index: openacs-4/packages/news/www/item-create-thankyou.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create-thankyou.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/news/www/item-create-thankyou.adp 18 Oct 2001 03:47:49 -0000 1.2 +++ openacs-4/packages/news/www/item-create-thankyou.adp 5 Sep 2002 10:49:47 -0000 1.3 @@ -1,6 +1,6 @@ -@context_bar@ +@context@ @title@

Index: openacs-4/packages/news/www/item-create.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/item-create.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/item-create.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@

Use the following form to define your news item. Index: openacs-4/packages/news/www/item-create.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/item-create.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/item-create.tcl 5 Sep 2002 10:49:47 -0000 1.2 @@ -13,7 +13,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue publish_date_select:onevalue archive_date_select:onevalue immediate_approve_p:onevalue @@ -34,7 +34,7 @@ } set title "Create News Item" -set context_bar [list $title] +set context [list $title] set proj_archival_date [db_string week "select sysdate + [ad_parameter ActiveDays "news" 14] from dual"] Index: openacs-4/packages/news/www/item.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/item.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/item.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,6 +1,6 @@ -@context_bar@ +@context@ @title@ Index: openacs-4/packages/news/www/item.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/news/www/item.tcl 19 Oct 2001 02:11:55 -0000 1.4 +++ openacs-4/packages/news/www/item.tcl 5 Sep 2002 10:49:47 -0000 1.5 @@ -13,7 +13,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue item_exist_p:onevalue publish_title:onevalue publish_date:onevalue @@ -70,10 +70,10 @@ } set title $publish_title - set context_bar [list $title] + set context [list $title] } else { - set context_bar {} + set context {} set title "Error" } Index: openacs-4/packages/news/www/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/Attic/master.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/master.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/master.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,10 +1,9 @@ @title@ +@context@

@title@

- -<%= [eval ad_context_bar $context_bar] %> - +<%= [eval ad_context_bar $context] %>
Index: openacs-4/packages/news/www/preview.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/preview.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/preview.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/preview.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@

Index: openacs-4/packages/news/www/preview.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/preview.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/preview.tcl 13 Mar 2002 22:50:53 -0000 1.3 +++ openacs-4/packages/news/www/preview.tcl 5 Sep 2002 10:49:47 -0000 1.4 @@ -70,7 +70,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue publish_title:onevalue publish_body:onevalue publish_location:onevalue @@ -92,7 +92,7 @@ set news_admin_p [ad_permission_p $package_id news_admin] set title "Preview $action" -set context_bar [list $title] +set context [list $title] # deal with Dates, granularity is 'day' Index: openacs-4/packages/news/www/admin/approve.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/approve.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/approve.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/approve.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@

Index: openacs-4/packages/news/www/admin/approve.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/approve.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/news/www/admin/approve.tcl 15 Oct 2001 13:41:03 -0000 1.2 +++ openacs-4/packages/news/www/admin/approve.tcl 5 Sep 2002 10:49:47 -0000 1.3 @@ -17,15 +17,15 @@ items:multirow title:onevalue - context_bar:onevalue + context:onevalue publish_date_select:onevalue archive_date_select:onevalue hidden_vars:onevalue } set title "Approve item(s)" -set context_bar [list $title] +set context [list $title] # pre-set date widgets with defaults Index: openacs-4/packages/news/www/admin/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/index.adp,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/admin/index.adp 10 Mar 2002 21:52:40 -0000 1.3 +++ openacs-4/packages/news/www/admin/index.adp 5 Sep 2002 10:49:47 -0000 1.4 @@ -1,5 +1,5 @@ -@context_bar@ +@context@

@title@ Index: openacs-4/packages/news/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/index.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/index.tcl 5 Sep 2002 10:49:47 -0000 1.2 @@ -17,7 +17,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue view_link:onevalue hidden_vars:onevalue select_actions:onevalue @@ -58,7 +58,7 @@ set title "Administration" -set context_bar {} +set context {} # administrator sees all news items Index: openacs-4/packages/news/www/admin/item.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/item.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/item.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/item.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@

Index: openacs-4/packages/news/www/admin/item.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/item.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/item.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/item.tcl 5 Sep 2002 10:49:47 -0000 1.2 @@ -17,7 +17,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue hidden_vars:onevalue item_name:onevalue item_creator:onevalue @@ -34,7 +34,7 @@ set title "One Item" -set context_bar [list $title] +set context [list $title] set hidden_vars [export_form_vars item_id return_url] Index: openacs-4/packages/news/www/admin/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/Attic/master.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/master.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/master.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,9 +1,10 @@ @title@ +@context@

@title@

-<%= [eval ad_context_bar $context_bar] %> +<%= [eval ad_context_bar $context] %>
Index: openacs-4/packages/news/www/admin/process.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/process.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/process.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/process.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@

Index: openacs-4/packages/news/www/admin/process.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/process.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/process.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/process.tcl 5 Sep 2002 10:49:47 -0000 1.2 @@ -23,7 +23,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue action:onevalue hidden_vars:onevalue unapproved:multirow @@ -42,7 +42,7 @@ } set title "Confirm Action: $action" -set context_bar [list $title] +set context [list $title] # produce bind_id_list Index: openacs-4/packages/news/www/admin/revision-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision-add.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/revision-add.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/revision-add.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@ Index: openacs-4/packages/news/www/admin/revision-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision-add.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/admin/revision-add.tcl 16 Oct 2001 10:10:19 -0000 1.3 +++ openacs-4/packages/news/www/admin/revision-add.tcl 5 Sep 2002 10:49:47 -0000 1.4 @@ -17,7 +17,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue publish_date:onevalue publish_date_desc:onevalue publish_title:onevalue @@ -39,7 +39,7 @@ } set title "One Item - add revision" -set context_bar [list $title] +set context [list $title] # get active revision of news item db_1row item " Index: openacs-4/packages/news/www/admin/revision.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news/www/admin/revision.adp 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/news/www/admin/revision.adp 5 Sep 2002 10:49:47 -0000 1.2 @@ -1,5 +1,5 @@ -@context_bar@ +@context@ @title@ Index: openacs-4/packages/news/www/admin/revision.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/admin/revision.tcl 16 Oct 2001 10:10:19 -0000 1.3 +++ openacs-4/packages/news/www/admin/revision.tcl 5 Sep 2002 10:49:47 -0000 1.4 @@ -15,7 +15,7 @@ } -properties { title:onevalue - context_bar:onevalue + context:onevalue news_admin_p:onevalue item_exist_p:onevalue publish_title:onevalue @@ -60,11 +60,11 @@ if {[info exists html_p] && ![string equal $html_p "t"]} { set publish_body "

[ad_quotehtml $publish_body]
" } - set title "One Item" - set context_bar [list $title] + set title "One Revision" + set context [list $title] } else { - set context_bar {} + set context {} set title "Error" }