Index: openacs-4/www/templates/widgets/statistics.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/www/templates/widgets/Attic/statistics.tcl,v
diff -u -r1.1.2.2 -r1.1.2.3
--- openacs-4/www/templates/widgets/statistics.tcl	31 Jan 2005 15:23:13 -0000	1.1.2.2
+++ openacs-4/www/templates/widgets/statistics.tcl	6 Jul 2009 09:21:01 -0000	1.1.2.3
@@ -6,6 +6,12 @@
 
 set whos_online_url "[subsite::get_element -element url]shared/whos-online"
 
+if {[info command ::throttle] ne ""} {
+    set active24     [throttle users nr_users_per_day]
+    set authUsers24  [lindex $active24 1]
+    set activeIP24   [lindex $active24 0]
+    set visitors     [expr {$authUsers24 + $activeIP24}]
+}
 
 # we seed with the no. of downloads on the old site.
 # LARS 2003-08-18: I've taken this out because it makes us look stupid