Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v
diff -u -r1.71 -r1.72
--- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	3 Oct 2003 17:37:58 -0000	1.71
+++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	12 Nov 2003 10:08:35 -0000	1.72
@@ -230,21 +230,9 @@
     } {
 	Get the names the the user
     } {
-        return [util_memoize "dotlrn::get_user_name_not_cached $user_id"]
+        return [acs_user::get_element -user_id $user_id -element name]
     }
 
-    ad_proc -private get_user_name_not_cached {
-	user_id
-    } {
-        helper
-    } {
-	return [db_string select_user_name {
-            select first_names || ' ' || last_name
-            from cc_users
-            where user_id = :user_id
-        } -default ""]
-    }
-
     ad_proc -public instantiate_and_mount {
 	{-mount_point ""}
 	community_id