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]