Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.54 -r1.55
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	21 Aug 2007 09:08:57 -0000	1.54
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	20 Jan 2008 11:30:41 -0000	1.55
@@ -546,6 +546,7 @@
         acs_user::get -user_id $user_id -array user
     }] } {
         util_memoize_flush [list acs_user::get_from_username_not_cached $user(username) $user(authority_id)]
+	util_memoize_flush [list acs_user::get_by_username_not_cached -authority_id $user(authority_id) -username $user(username)]
     }
 }