Index: openacs-4/packages/xotcl-request-monitor/www/users-in-community.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/users-in-community.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xotcl-request-monitor/www/users-in-community.tcl	14 Dec 2005 16:09:02 -0000	1.1
+++ openacs-4/packages/xotcl-request-monitor/www/users-in-community.tcl	12 Sep 2008 20:12:08 -0000	1.2
@@ -27,11 +27,11 @@
   foreach {timestamp requestor} $e break
   if {[info exists listed($requestor)]} continue
   set listed($requestor) 1
-  if {[string first . $requestor] > 0} {
-    set user_string $requestor
-  } else {
+  if {[string is integer $requestor]} {
     acs_user::get -user_id $requestor -array user
     set user_string "$user(first_names) $user(last_name)"
+  } else {
+    set user_string $requestor
   }
   set time [clock format $timestamp -format "%H:%M"]
   t1 add -time $time -user $user_string