Index: openacs-4/packages/xotcl-request-monitor/www/whos-online-today.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/whos-online-today.tcl,v
diff -u -N -r1.9.2.1 -r1.9.2.2
--- openacs-4/packages/xotcl-request-monitor/www/whos-online-today.tcl	20 Nov 2019 13:24:52 -0000	1.9.2.1
+++ openacs-4/packages/xotcl-request-monitor/www/whos-online-today.tcl	25 Jan 2020 14:04:02 -0000	1.9.2.2
@@ -59,11 +59,9 @@
   lappend users [list $user_label \
 		     $user_url \
 		     $timestamp \
-                     [util::age_pretty \
-                          -timestamp_ansi [lc_clock_to_ansi $timestamp] \
-                          -sysdate_ansi $now_ansi \
-                          -mode_3_fmt "%d %b %Y, at %X"] \
-		    ]
+                     [::xowiki::utility pretty_age \
+                          -timestamp [clock scan [lc_clock_to_ansi $timestamp]]] \
+                    ]
 }
 
 switch -glob $orderby {