Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete-2.tcl,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete-2.tcl 27 Oct 2014 16:39:53 -0000 1.5 +++ openacs-4/packages/acs-subsite/www/admin/rel-segments/constraints/delete-2.tcl 27 Jun 2015 16:03:13 -0000 1.6 @@ -25,7 +25,7 @@ if { [db_0or1row select_segment_id { select c.rel_segment as segment_id from rel_constraints c where c.constraint_id = :constraint_id }] } { - set return_url "../one?[export_vars {segment_id}]" + set return_url [export_vars -base ../one {segment_id}] } } @@ -51,7 +51,7 @@ } elseif { $return_url eq "" } { # if we're not deleting, redirect to the constraint page - set return_url one?[export_vars constraint_id] + set return_url [export_vars -base one constraint_id] }