Index: openacs-4/packages/xotcl-request-monitor/www/whos-online.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/whos-online.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/xotcl-request-monitor/www/whos-online.tcl	9 May 2018 15:33:34 -0000	1.14
+++ openacs-4/packages/xotcl-request-monitor/www/whos-online.tcl	27 Jun 2018 16:16:48 -0000	1.15
@@ -64,8 +64,8 @@
 foreach element [throttle users active -full] {
   lassign $element user_id pa timestamp hits smooth switches
   if {[string is integer $user_id]} {
-    acs_user::get -user_id $user_id -array user
-    set user_label "$user(last_name), $user(first_names)" 
+    set person [person::get_person_info -person_id $user_id]
+    set user_label "[dict get $person last_name], [dict get $person first_names]"
     set user_url [acs_community_member_url -user_id $user_id]
   } else {
     if {$all} continue