Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -r1.120 -r1.121
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	8 Jun 2009 09:20:25 -0000	1.120
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	16 Jun 2009 07:02:21 -0000	1.121
@@ -1690,7 +1690,8 @@
       set count [llength $values]
       if {$count == $max_users} {
         # we have to check, whether there were more users...
-        set count [db_string [my qn presence_count_users] "$select_count $where_clause"] 
+        set count [db_string [my qn presence_count_users] \
+                       "select count(distinct user_id) from xowiki_last_visited WHERE $where_clause"]
       }
       foreach value  $values {
         foreach {user_id time} $value break