Index: openacs-4/packages/imsld/www/admin/imsld-admin-roles.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-admin-roles.tcl,v diff -u -N -r1.9 -r1.9.2.1 --- openacs-4/packages/imsld/www/admin/imsld-admin-roles.tcl 14 Nov 2008 18:27:53 -0000 1.9 +++ openacs-4/packages/imsld/www/admin/imsld-admin-roles.tcl 4 Aug 2009 13:30:08 -0000 1.9.2.1 @@ -14,7 +14,7 @@ } set page_title "[_ imsld.Admin_roles]" -set context "" +set context [list $page_title] #check if the run is waiting if { [db_0or1row get_run_status { Index: openacs-4/packages/imsld/www/admin/imsld-finish.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-finish.tcl,v diff -u -N -r1.6 -r1.6.2.1 --- openacs-4/packages/imsld/www/admin/imsld-finish.tcl 17 Apr 2008 17:17:54 -0000 1.6 +++ openacs-4/packages/imsld/www/admin/imsld-finish.tcl 4 Aug 2009 13:30:08 -0000 1.6.2.1 @@ -9,7 +9,7 @@ } set page_title "[_ imsld.lt_Confirm_roles_assignm]" -set context "" +set context [list $page_title] # NOTE(lfuente): here there should be a check of all the input Index: openacs-4/packages/imsld/www/admin/imsld-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-new.tcl,v diff -u -N -r1.11 -r1.11.2.1 --- openacs-4/packages/imsld/www/admin/imsld-new.tcl 17 Jun 2009 08:00:01 -0000 1.11 +++ openacs-4/packages/imsld/www/admin/imsld-new.tcl 4 Aug 2009 13:30:47 -0000 1.11.2.1 @@ -20,7 +20,7 @@ permission::require_permission -object_id $package_id -privilege create set page_title "[_ imsld.Confirm_New_IMS-LD]" -set context [list [list "[_ imsld.New_IMS-LD]" "new-imsld"] [list "[_ imsld.Confirm_New_IMS-LD]"]] +set context [list "[_ imsld.Confirm_New_IMS-LD]"] set user_id [ad_conn user_id] Index: openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl 17 Apr 2008 17:17:54 -0000 1.4 +++ openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl 4 Aug 2009 13:30:08 -0000 1.4.2.1 @@ -25,7 +25,7 @@ set roles_list_names [imsld::roles::get_roles_names -roles_list $roles_list] set page_title "[_ imsld.View_Roles]" -set context "" +set context [list $page_title] set lista [list] lappend lista [list "[_ imsld.Select_a_role]" 0] Index: openacs-4/packages/imsld/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/index.tcl,v diff -u -N -r1.21.2.1 -r1.21.2.2 --- openacs-4/packages/imsld/www/admin/index.tcl 28 Jul 2009 19:52:33 -0000 1.21.2.1 +++ openacs-4/packages/imsld/www/admin/index.tcl 4 Aug 2009 13:30:08 -0000 1.21.2.2 @@ -35,7 +35,7 @@ permission::require_permission -object_id $package_id -privilege create set page_title "[_ imsld.Admin_IMS_LD]" -set context [list "[_ imsld.Admin_IMS_LD]"] +set context "" set user_id [ad_conn user_id] set manifest_id [db_nextval acs_object_id_seq]