Index: openacs-4/packages/contacts/www/contact-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact-add.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/contacts/www/contact-add.tcl	13 Jun 2005 08:20:22 -0000	1.9
+++ openacs-4/packages/contacts/www/contact-add.tcl	13 Jun 2005 09:36:05 -0000	1.10
@@ -233,6 +233,9 @@
 		    db_dml insert_state { insert into membership_rels (rel_id,member_state) values (:rel_id,'approved') }
 		}
 	    }
+
+	    callback contact::organization_new -package_id $package_id -contact_id $party_id
+
 	}
 	
 	# Save the contact information
@@ -247,10 +250,6 @@
                 -object_id $revision_id
         }
 
-
-
-	callback contact::contact_new_form -package_id $package_id -contact_id $party_id -form party_ae -object_type $object_type
-
 	# Add the user to the
 	util_user_message -html -message "The $object_type <a href=\"contact?party_id=$party_id\">[contact::name -party_id $party_id]</a> was added"