Index: openacs-4/packages/acs-tcl/tcl/whos-online-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/whos-online-procs.tcl,v
diff -u -r1.9 -r1.9.2.1
--- openacs-4/packages/acs-tcl/tcl/whos-online-procs.tcl	18 Sep 2018 15:27:19 -0000	1.9
+++ openacs-4/packages/acs-tcl/tcl/whos-online-procs.tcl	30 Mar 2021 15:44:18 -0000	1.9.2.1
@@ -56,7 +56,7 @@
     }
 }
 
-ad_proc -private whos_online::interval {} {
+ad_proc -public whos_online::interval {} {
     Returns the last number of seconds within a user must have requested
     a page to be considered online. Based on the LastVisitUpdateInterval parameter
     of the main site and defaults to 600 seconds = 10 minutes.