Index: openacs-4/packages/xotcl-request-monitor/www/last101.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/last101.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xotcl-request-monitor/www/last101.tcl	14 Dec 2005 16:09:02 -0000	1.1
+++ openacs-4/packages/xotcl-request-monitor/www/last101.tcl	12 Sep 2008 20:12:08 -0000	1.2
@@ -37,11 +37,11 @@
 
 foreach l $stat {
   foreach {timestamp c url ms requestor} $l break
-  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
   }
   t1 add -time [clock format $timestamp -format "%H:%M:%S"] \
       -user $user_string \