Index: openacs-4/packages/assessment/www/asm-admin/assessment-copy.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-copy.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/assessment-copy.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/assessment-copy.adp	8 Apr 2005 00:48:16 -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="assessment_copy_confirm"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl	30 Mar 2005 10:27:38 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl	8 Apr 2005 00:48:10 -0000	1.4
@@ -6,7 +6,7 @@
 } {
     assessment_id:integer
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     page_title:onevalue
 }
 
@@ -27,7 +27,7 @@
 
 set assessment_rev_id $assessment_data(assessment_rev_id)
 set page_title "[_ assessment.copy_assessment]"
-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 confirm_options [list [list "[_ assessment.continue_with_copy]" t] [list "[_ assessment.cancel_and_return]" f]]
 
Index: openacs-4/packages/assessment/www/asm-admin/assessment-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-delete.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/assessment-delete.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/assessment-delete.adp	8 Apr 2005 00:45:42 -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="assessment_delete_confirm"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/assessment-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-delete.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/assessment-delete.tcl	2 Feb 2005 21:31:15 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/assessment-delete.tcl	8 Apr 2005 00:45:36 -0000	1.3
@@ -6,7 +6,7 @@
 } {
     assessment_id:integer
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     page_title:onevalue
 }
 
@@ -24,7 +24,7 @@
 
 set assessment_rev_id $assessment_data(assessment_rev_id)
 set page_title "[_ assessment.remove_assessment]"
-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 confirm_options [list [list "[_ assessment.continue_with_remove]" t] [list "[_ assessment.cancel_and_return]" f]]
 
Index: openacs-4/packages/assessment/www/asm-admin/assessment-form.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-form.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/assessment-form.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/assessment-form.adp	8 Apr 2005 00:45:56 -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="assessment_form"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/assessment-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-form.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/assessment/www/asm-admin/assessment-form.tcl	31 Mar 2005 13:04:58 -0000	1.5
+++ openacs-4/packages/assessment/www/asm-admin/assessment-form.tcl	8 Apr 2005 00:46:02 -0000	1.6
@@ -7,7 +7,7 @@
     assessment_id:integer,optional
     {__new_p 0}
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     page_title:onevalue
 }
 
@@ -23,7 +23,7 @@
 set package_id [ad_conn package_id]
 permission::require_permission -object_id $package_id -privilege create
 
-set context_bar [ad_context_bar $page_title]
+set context [list [list index [_ assessment.admin]] $page_title]
 set package_id [ad_conn package_id]
 set sql_format "YYYY-MM-DD HH24:MI:SS"
 set form_format "[lc_get formbuilder_date_format] [lc_get formbuilder_time_format]"
Index: openacs-4/packages/assessment/www/asm-admin/send-mail.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/send-mail.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/send-mail.adp	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/send-mail.adp	8 Apr 2005 00:50:35 -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="send-mail"></formtemplate>
Index: openacs-4/packages/assessment/www/asm-admin/send-mail.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/send-mail.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/send-mail.tcl	2 Feb 2005 21:31:15 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/send-mail.tcl	8 Apr 2005 00:50:40 -0000	1.3
@@ -11,6 +11,9 @@
 } {
   assessment_id:integer,notnull
   {to "responded"}  
+} -properties {
+    context:onevalue
+    page_title:onevalue
 }
 
 set package_id [ad_conn package_id]
@@ -30,7 +33,7 @@
 
 set page_title "[_ assessment.Send_Mail]"
 set assessment_name $assessment_data(title)
-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 select_sender_info {}
 set dotlrn_installed_p [apm_package_installed_p dotlrn]