Index: openacs-4/packages/acs-subsite/www/admin/parties/new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/parties/new.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/acs-subsite/www/admin/parties/new.tcl 27 Oct 2014 16:39:52 -0000 1.7 +++ openacs-4/packages/acs-subsite/www/admin/parties/new.tcl 9 Jun 2015 07:57:52 -0000 1.8 @@ -196,7 +196,12 @@ foreach group_rel_type $group_rel_type_list { lassign $group_rel_type next_group_id next_rel_type lappend return_url_list \ - "../relations/add?group_id=$next_group_id&rel_type=[ad_urlencode $next_rel_type]&party_id=$party_id&allow_out_of_scope_p=t" + [export_vars -base "../relations/add" { + {group_id $next_group_id} + {rel_type $next_rel_type} + party_id + {allow_out_of_scope_p t} + }] } # Add the original return_url as the last one in the list