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.44 -r1.45
--- openacs-4/packages/contacts/www/contact-add.tcl	27 Feb 2006 03:46:17 -0000	1.44
+++ openacs-4/packages/contacts/www/contact-add.tcl	2 Apr 2006 22:10:29 -0000	1.45
@@ -311,6 +311,7 @@
 	    }
 	    
 	    callback contact::${object_type}_new_rel -object_id_two $object_id_two -rel_type $rel_type -party_id $party_id
+	    contact::flush -party_id $object_id_two
 	}
 
 	# Add the user to the