Index: openacs-4/packages/contacts/www/contact-rels.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact-rels.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/contacts/www/contact-rels.tcl	22 May 2006 22:30:42 -0000	1.26
+++ openacs-4/packages/contacts/www/contact-rels.tcl	12 Jun 2006 07:54:21 -0000	1.27
@@ -157,6 +157,8 @@
     set original_party_id $party_id
     db_multirow -extend {map_url} -unclobber contacts contacts_select {} {
 	set map_url [export_vars -base "${package_url}relationship-add" -url {{party_one $original_party_id} {party_two $party_id} {role_two $role_two}}]
+
+	callback contact::contact_rels
     }
 
 }