Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/delete-2.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-subsite/www/admin/rel-segments/delete-2.tcl 27 Oct 2014 16:39:52 -0000 1.3 +++ openacs-4/packages/acs-subsite/www/admin/rel-segments/delete-2.tcl 27 Jun 2015 16:03:13 -0000 1.4 @@ -27,7 +27,7 @@ select s.group_id from rel_segments s where s.segment_id = :segment_id } -default ""] if { $group_id ne "" } { - set return_url "../groups/one?[export_vars group_id]" + set return_url [export_vars -base ../groups/one group_id] } } @@ -38,7 +38,7 @@ } if { $return_url eq "" } { - set return_url "one?[export_vars {segment_id}]" + set return_url [export_vars -base one {segment_id}] } ad_returnredirect $return_url