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.29 -r1.30
--- openacs-4/packages/contacts/www/contact-add.tcl	24 Aug 2005 10:50:07 -0000	1.29
+++ openacs-4/packages/contacts/www/contact-add.tcl	15 Sep 2005 22:46:43 -0000	1.30
@@ -239,9 +239,8 @@
 	    }
 	    
 	    category::map_object -remove_old -object_id $party_id $cat_ids
-
 	    
-	    callback contact::person_new -package_id $package_id -contact_id $party_id
+	    callback contact::person_new -package_id $package_id -contact_id $object_id_two -party_id $party_id
 	    
 	} else {