Index: openacs-4/packages/assessment/www/asm-admin/catalog-search.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/catalog-search.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/catalog-search.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/catalog-search.adp	7 Apr 2005 21:37:46 -0000	1.2
@@ -1,6 +1,6 @@
 <master>
 <property name="title">@page_title;noquote@</property>
-<property name="context_bar">@context_bar;noquote@</property>
+<property name="context">@context;noquote@</property>
 
 <blockquote>
   <formtemplate id="catalog_search"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/catalog-search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/catalog-search.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/catalog-search.tcl	9 Feb 2005 11:00:26 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/catalog-search.tcl	7 Apr 2005 21:37:58 -0000	1.4
@@ -30,10 +30,10 @@
 if {[info exists section_id]} {
     db_1row section_title {}
     set page_title "[_ assessment.Search_Item_1]"
-    set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] "[_ assessment.Search_Item]"]
+    set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] "[_ assessment.Search_Item]"]
 } else {
     set page_title "[_ assessment.Search_Section_1]"
-    set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] "[_ assessment.Search_Section]"]
+    set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] "[_ assessment.Search_Section]"]
 }
 
 set package_id [ad_conn package_id]
Index: openacs-4/packages/assessment/www/asm-admin/section-display-form.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-display-form.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/section-display-form.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/section-display-form.adp	7 Apr 2005 21:40:45 -0000	1.2
@@ -1,6 +1,6 @@
 <master>
 <property name="title">@page_title;noquote@</property>
-<property name="context_bar">@context_bar;noquote@</property>
+<property name="context">@context;noquote@</property>
 
 <blockquote>
   <formtemplate id="section_display_form"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/section-display-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-display-form.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/section-display-form.tcl	2 Feb 2005 21:31:15 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/section-display-form.tcl	7 Apr 2005 21:40:39 -0000	1.3
@@ -30,7 +30,7 @@
     set page_title [_ assessment.add_new_section_display]
 }
 
-set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
+set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
 set package_id [ad_conn package_id]
 
 set boolean_options [list [list "[_ assessment.yes]" t] [list "[_ assessment.no]" f]]
Index: openacs-4/packages/assessment/www/asm-admin/section-form.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-form.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/section-form.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/section-form.adp	7 Apr 2005 21:34:45 -0000	1.2
@@ -1,6 +1,6 @@
 <master>
 <property name="title">@page_title;noquote@</property>
-<property name="context_bar">@context_bar;noquote@</property>
+<property name="context">@context;noquote@</property>
 
 <blockquote>
   <formtemplate id="section_form"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/section-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-form.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/section-form.tcl	21 Feb 2005 14:32:56 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/section-form.tcl	7 Apr 2005 21:34:52 -0000	1.4
@@ -33,7 +33,7 @@
     set _section_id $section_id
 }
 
-set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
+set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
 
 set display_types [db_list_of_lists section_display_types {}]
 set display_types [concat [list [list "[_ assessment.section_new_display]" ""]] $display_types]
Index: openacs-4/packages/assessment/www/asm-admin/section-preview.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-preview.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/section-preview.adp	1 Apr 2005 06:19:31 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/section-preview.adp	7 Apr 2005 21:43:22 -0000	1.3
@@ -1,6 +1,6 @@
 <master>
 <property name="title">@page_title;noquote@</property>
-<property name="context_bar">@context_bar;noquote@</property>
+<property name="context">@context;noquote@</property>
 
 <table width="100%" cellpadding="3" cellspacing="0" border="0">
 <tr><th colspan="3">@assessment_data.title@</th></tr>
Index: openacs-4/packages/assessment/www/asm-admin/section-preview.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-preview.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/section-preview.tcl	1 Apr 2005 06:19:31 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/section-preview.tcl	7 Apr 2005 21:43:28 -0000	1.3
@@ -26,7 +26,7 @@
 
 set assessment_rev_id $assessment_data(assessment_rev_id)
 set page_title "[_ assessment.section_preview]"
-set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
+set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
 db_1row section_data {} -column_array section
 
 # get all items of section in correct order