Index: openacs.org-dev/packages/value-based-shipping/www/admin/level-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/value-based-shipping/www/admin/level-edit.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/value-based-shipping/www/admin/level-edit.tcl	9 Jul 2002 17:35:18 -0000	1.1.1.1
+++ openacs.org-dev/packages/value-based-shipping/www/admin/level-edit.tcl	8 Oct 2002 15:47:44 -0000	1.1.1.2
@@ -32,7 +32,7 @@
 
 # Set the context bar.
 
-set context_bar [ad_context_bar "Service Levels"]
+set context_bar [ad_context_bar [list levels "Service Levels"] Edit]
 
 template::form create level_edit -elements {
     service_level_id \
@@ -54,7 +54,7 @@
 
     # The request didn't include a service level ID.
 
-    template::element::set_value level_edit service_level_id [db_nextval vbs_service_level_id_sequence]
+    template::element::set_value level_edit service_level_id [db_nextval vbs_service_level_id_seq]
 
 } else {