Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.46 -r1.47
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	25 Sep 2003 13:39:02 -0000	1.46
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	1 Oct 2003 13:54:31 -0000	1.47
@@ -499,8 +499,6 @@
 
     ad_call_proc_if_exists ds_collect_connection_info
 
-
-
     # -------------------------------------------------------------------------
     # Start of patch "hostname-based subsites"
     # -------------------------------------------------------------------------
@@ -638,6 +636,12 @@
         ad_conn -set language ""
     }
 
+    # Who's online
+    # Don't record requests for not-logged in users
+    if { [ad_conn user_id] != "0"} { 
+        util::whos_online::user_requested_page [ad_conn user_id]
+    }
+
     #####
     #
     # Make sure the user is authorized to make this request.