Index: openacs-4/packages/acs-subsite/www/members/user-new.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/user-new.adp,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-subsite/www/members/user-new.adp 6 May 2007 06:58:40 -0000 1.5 +++ openacs-4/packages/acs-subsite/www/members/user-new.adp 7 Apr 2011 11:39:12 -0000 1.6 @@ -7,4 +7,4 @@ self_register_p="0" email="@email@" return_url="." - rel_group_id="@group_id@" /> + rel_group_id="@rel_group_id@" /> Index: openacs-4/packages/acs-subsite/www/members/user-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/user-new.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/acs-subsite/www/members/user-new.tcl 6 May 2007 06:58:40 -0000 1.9 +++ openacs-4/packages/acs-subsite/www/members/user-new.tcl 7 Apr 2011 11:39:12 -0000 1.10 @@ -12,6 +12,15 @@ set group_id [application_group::group_id_from_package_id] +set mainsite_group_id [application_group::group_id_from_package_id \ + -no_complain \ + -package_id [subsite::main_site_id]] + +set rel_group_id "" +if { $mainsite_group_id ne $group_id } { + set rel_group_id $group_id +} + set page_title "Inivite Member to [ad_conn instance_name]" set context [list [list "." "Members"] "Invite"]