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.1 -r1.1.2.2
--- openacs-4/www/templates/widgets/statistics.tcl	1 Dec 2004 10:42:23 -0000	1.1.2.1
+++ openacs-4/www/templates/widgets/statistics.tcl	31 Jan 2005 15:23:13 -0000	1.1.2.2
@@ -1,7 +1,12 @@
 
 set n_users [util_memoize {db_string select_n_users "select count(user_id) from users" -default "unknown"} 300]
 
+# Who's Online
+set num_users_online [lc_numeric [whos_online::num_users]]
 
+set whos_online_url "[subsite::get_element -element url]shared/whos-online"
+
+
 # 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
 # only 3088 downloads from 6774 users ... < .5 download per user