Index: openacs-4/packages/dotlrn/www/communities.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/communities.adp,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/dotlrn/www/communities.adp 5 Jan 2008 12:00:59 -0000 1.11 +++ openacs-4/packages/dotlrn/www/communities.adp 12 Mar 2008 22:11:31 -0000 1.12 @@ -21,8 +21,8 @@ @title@ 0 +@context;noquote@ -
Index: openacs-4/packages/dotlrn/www/communities.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/communities.tcl,v diff -u -N -r1.9 -r1.10 --- openacs-4/packages/dotlrn/www/communities.tcl 20 Dec 2007 13:56:40 -0000 1.9 +++ openacs-4/packages/dotlrn/www/communities.tcl 12 Mar 2008 22:11:31 -0000 1.10 @@ -37,6 +37,7 @@ set user_id [ad_maybe_redirect_for_registration] set portlet_title [_ dotlrn.Communities] set title [_ dotlrn.Communities] +set context [list [_ dotlrn.Communities]] set admin_p [dotlrn::admin_p] set admin_url "[dotlrn::get_url]/admin" set cockpit_url "[dotlrn::get_url]/admin/cockpit" Index: openacs-4/packages/dotlrn/www/control-panel.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/control-panel.adp,v diff -u -N -r1.19 -r1.20 --- openacs-4/packages/dotlrn/www/control-panel.adp 22 Jun 2007 02:23:28 -0000 1.19 +++ openacs-4/packages/dotlrn/www/control-panel.adp 12 Mar 2008 22:11:31 -0000 1.20 @@ -21,8 +21,8 @@ @title@ 0 +@context;noquote@ -
Index: openacs-4/packages/dotlrn/www/control-panel.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/control-panel.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/dotlrn/www/control-panel.tcl 22 Jun 2007 02:23:28 -0000 1.11 +++ openacs-4/packages/dotlrn/www/control-panel.tcl 12 Mar 2008 22:11:31 -0000 1.12 @@ -40,6 +40,7 @@ set user_id [auth::require_login -account_status closed] set title [parameter::get -localize -parameter admin_page_name] +set context [list [parameter::get -localize -parameter admin_page_name]] set admin_p [dotlrn::admin_p] set admin_url "[dotlrn::get_url]/admin" set cockpit_url "[dotlrn::get_url]/admin/cockpit" Index: openacs-4/packages/dotlrn/www/courses.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/courses.adp,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/dotlrn/www/courses.adp 15 May 2007 20:14:25 -0000 1.3 +++ openacs-4/packages/dotlrn/www/courses.adp 12 Mar 2008 22:11:31 -0000 1.4 @@ -21,8 +21,8 @@ @title@ 0 +@context;noquote@ -
Index: openacs-4/packages/dotlrn/www/courses.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/courses.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/dotlrn/www/courses.tcl 20 Dec 2007 13:56:40 -0000 1.3 +++ openacs-4/packages/dotlrn/www/courses.tcl 12 Mar 2008 22:11:31 -0000 1.4 @@ -37,6 +37,7 @@ set user_id [ad_maybe_redirect_for_registration] set portlet_title [_ dotlrn.Courses] set title [_ dotlrn.Courses] +set context [list [_ dotlrn.Courses]] set admin_p [dotlrn::admin_p] set admin_url "[dotlrn::get_url]/admin" set cockpit_url "[dotlrn::get_url]/admin/cockpit" Index: openacs-4/packages/dotlrn/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/index.adp,v diff -u -N -r1.26 -r1.27 --- openacs-4/packages/dotlrn/www/index.adp 15 May 2007 20:14:25 -0000 1.26 +++ openacs-4/packages/dotlrn/www/index.adp 12 Mar 2008 22:11:31 -0000 1.27 @@ -20,5 +20,7 @@ 1 + @title@ + @context;noquote@ @rendered_page;noquote@ Index: openacs-4/packages/dotlrn/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/index.tcl,v diff -u -N -r1.45 -r1.46 --- openacs-4/packages/dotlrn/www/index.tcl 29 Dec 2006 19:02:37 -0000 1.45 +++ openacs-4/packages/dotlrn/www/index.tcl 12 Mar 2008 22:11:31 -0000 1.46 @@ -61,6 +61,7 @@ where portal_id = :portal_id and sort_key = :page_num } -default ""] +set context [list [lang::util::localize $title]] set rendered_page [dotlrn::render_page -page_num $page_num -hide_links_p t $portal_id] ad_return_template Index: openacs-4/packages/dotlrn/www/one-community-admin.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-admin.tcl,v diff -u -N -r1.28 -r1.29 --- openacs-4/packages/dotlrn/www/one-community-admin.tcl 4 May 2006 15:09:14 -0000 1.28 +++ openacs-4/packages/dotlrn/www/one-community-admin.tcl 12 Mar 2008 22:11:31 -0000 1.29 @@ -47,4 +47,4 @@ # render the admin page set rendered_page [dotlrn::render_page -render_style all_in_one $admin_portal_id] -set context [list [_ dotlrn.control_panel]] +set context [list [_ dotlrn.Admin]] Index: openacs-4/packages/dotlrn/www/one-community.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community.adp,v diff -u -N -r1.28 -r1.29 --- openacs-4/packages/dotlrn/www/one-community.adp 15 May 2007 20:14:25 -0000 1.28 +++ openacs-4/packages/dotlrn/www/one-community.adp 12 Mar 2008 22:11:31 -0000 1.29 @@ -21,6 +21,9 @@ @title;noquote@ 1 + + @context;noquote@ +

Index: openacs-4/packages/dotlrn/www/one-community.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community.tcl,v diff -u -N -r1.35 -r1.36 --- openacs-4/packages/dotlrn/www/one-community.tcl 15 May 2007 20:14:25 -0000 1.35 +++ openacs-4/packages/dotlrn/www/one-community.tcl 12 Mar 2008 22:11:31 -0000 1.36 @@ -56,6 +56,12 @@ ] } +set page_id [portal::get_page_id -portal_id $portal_id -sort_key $page_num] +set page_name [portal::get_page_pretty_name -page_id $page_id] +if { $page_num ne 0} { + set context [list [lang::util::localize $page_name]] +} + set rendered_page [dotlrn::render_page \ -hide_links_p t \ -page_num $page_num \