Index: openacs-4/packages/contacts/tcl/contacts-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-procs.tcl,v diff -u -r1.40 -r1.41 --- openacs-4/packages/contacts/tcl/contacts-procs.tcl 14 Dec 2005 17:28:19 -0000 1.40 +++ openacs-4/packages/contacts/tcl/contacts-procs.tcl 15 Dec 2005 18:38:15 -0000 1.41 @@ -266,6 +266,9 @@ util_memoize_flush "::contact::mailing_address_exists_p_not_cached -party_id $party_id" util_memoize_flush "::contact::name_not_cached -party_id $party_id" util_memoize_flush "::contact::email_not_cached -party_id $party_id" + util_memoize_flush "::contact::salutation_not_cached -party_id $party_id -type salutation" + util_memoize_flush "::contact::salutation_not_cached -party_id $party_id -type letter" + util_memoize_flush_regexp "::contact::employee_not_cached -employee_id $party_id" } ad_proc -public contact::name {