Index: openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl,v
diff -u -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl 27 Mar 2019 18:10:10 -0000 1.4.2.2
+++ openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl 6 Apr 2020 17:16:59 -0000 1.4.2.3
@@ -16,8 +16,9 @@
if {![string is integer -strict $uid]} {
set userinfo 0
} else {
- set user_url [acs_community_member_admin_url -user_id $uid]
- set userinfo "$uid"
+ set user_info [xo::request_monitor_user_info $uid]
+ set user_url [dict get $user_info url]
+ set userinfo "$uid"
}
return $userinfo
}