Index: openacs-4/packages/acs-subsite/www/members/member-invite.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/member-invite.tcl,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/acs-subsite/www/members/member-invite.tcl	10 Jan 2007 21:22:09 -0000	1.9
+++ openacs-4/packages/acs-subsite/www/members/member-invite.tcl	7 Apr 2011 12:08:40 -0000	1.10
@@ -18,6 +18,10 @@
     -group_id $group_id \
     -array group_info
 
+# if we are at main site, only show the form for creating a new user
+
+set subsite_p [expr { [subsite::main_site_id] ne [ad_conn package_id] }]
+
 ad_form -name user_search -cancel_url . -form {
     {user_id:search
         {result_datatype integer}