Index: openacs-4/packages/value-based-shipping/www/admin/levels.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/value-based-shipping/www/admin/levels.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/value-based-shipping/www/admin/levels.tcl	21 May 2002 18:35:37 -0000	1.1
+++ openacs-4/packages/value-based-shipping/www/admin/levels.tcl	6 Sep 2002 15:33:38 -0000	1.2
@@ -11,7 +11,7 @@
 } {
 } -properties {
     title:onevalue
-    context_bar:onevalue
+    context:onevalue
 }
 
 # Authenticate the user
@@ -38,7 +38,7 @@
 
 # Set the context bar.
 
-set context_bar [ad_context_bar "Service Levels"]
+set context [list "Service Levels"]
 
 template::query get_service_levels service_levels multirow "
     select *