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.62.2.6 -r1.62.2.7
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	17 Nov 2016 09:17:11 -0000	1.62.2.6
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	17 Nov 2016 09:22:12 -0000	1.62.2.7
@@ -499,7 +499,7 @@
     # get_from_username_not_cached proc
     #
     set u [acs_user::get -user_id $user_id]
-    set user_name    [dict get $u username]
+    set username     [dict get $u username]
     set authority_id [dict get $u authority_id]
     util_memoize_flush [list acs_user::get_from_username_not_cached $username $authority_id]
     util_memoize_flush [list acs_user::get_by_username_not_cached -authority_id $authority_id -username $username]