Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/new.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/new.tcl	13 Mar 2001 22:59:26 -0000	1.1
+++ openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/new.tcl	6 Sep 2002 21:50:02 -0000	1.2
@@ -15,7 +15,7 @@
     required_rel_segment:optional
     { return_url "" }
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     segment_name:onevalue
     return_url_enc:onevalue
     violations:onerow
@@ -35,7 +35,7 @@
 
 set return_url_enc [ad_urlencode "[ad_conn url]?[ad_export_vars {rel_segment constraint_name rel_side required_rel_segment return_url}]"]
 
-set context_bar [list [list "../" "Relational segments"] [list "../one?segment_id=$rel_segment" "One Segment"] "Add constraint"]
+set context [list [list "../" "Relational segments"] [list "../one?segment_id=$rel_segment" "One Segment"] "Add constraint"]
 
 set package_id [ad_conn package_id]