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.27 -r1.28 --- openacs-4/packages/contacts/www/contact-rels.tcl 12 Jun 2006 07:54:21 -0000 1.27 +++ openacs-4/packages/contacts/www/contact-rels.tcl 8 Sep 2006 12:07:50 -0000 1.28 @@ -199,6 +199,9 @@ break } if {[exists_and_not_null add]} { + if {$person_valid_p && $org_valid_p} { + ad_returnredirect [export_vars -base "${package_url}/ask" -url {group_ids {object_id_two "$party_id"} role_two}] + } if {$person_valid_p} { ad_returnredirect [export_vars -base "${package_url}/add/person" -url {group_ids {object_id_two "$party_id"} role_two}] }