Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete.tcl,v
diff -u -r1.3.26.2 -r1.3.26.3
--- openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete.tcl	9 Sep 2013 10:11:52 -0000	1.3.26.2
+++ openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete.tcl	9 Sep 2013 10:17:41 -0000	1.3.26.3
@@ -18,7 +18,7 @@
     export_vars:onevalue
 }
 
-set context [list [list one?[ad_export_vars constraint_id] "One constraint"] "Delete constraint"]
+set context [list [list one?[export_vars constraint_id] "One constraint"] "Delete constraint"]
 
 set package_id [ad_conn package_id]
 
@@ -37,4 +37,4 @@
     ad_script_abort
 }
 
-set export_vars [ad_export_vars -form {constraint_id return_url}]
+set export_vars [export_vars -form {constraint_id return_url}]