Index: openacs-4/packages/acs-subsite/www/shared/whos-online.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/whos-online.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-subsite/www/shared/whos-online.tcl	16 Feb 2004 14:48:15 -0000	1.8
+++ openacs-4/packages/acs-subsite/www/shared/whos-online.tcl	10 Jan 2007 21:22:10 -0000	1.9
@@ -34,7 +34,7 @@
 foreach user_id [whos_online::user_ids] {
     acs_user::get -user_id $user_id -array user
 
-    set first_request_minutes [expr [whos_online::seconds_since_first_request $user_id] / 60]
+    set first_request_minutes [expr {[whos_online::seconds_since_first_request $user_id] / 60}]
 
     lappend users [list \
                        "$user(first_names) $user(last_name)" \