Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v diff -u -r1.44 -r1.45 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 16 Jul 2007 00:54:16 -0000 1.44 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 12 Oct 2007 07:21:49 -0000 1.45 @@ -158,7 +158,7 @@ } { ns_log debug "OACS= sec_login_handler: enter" - +ns_log notice "--login handler" set auth_level none set new_user_id 0 set untrusted_user_id 0 @@ -186,6 +186,7 @@ # Check authentication cookie # First, check expiration if { [sec_login_timeout] == 0 || [ns_time] - $login_expr < [sec_login_timeout] } { +ns_log notice "-CHECK AUTH TOKEN" # Then check auth_token if {$auth_token eq [sec_get_user_auth_token $untrusted_user_id]} { # Are we secure?