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 -N -r1.69 -r1.70 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 18 Apr 2011 17:48:43 -0000 1.69 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 18 Apr 2011 20:57:43 -0000 1.70 @@ -98,7 +98,7 @@ # The session cookie already exists and is valid. set cookie_data [split [lindex $cookie_list 0] {,}] set session_expr [expr {[lindex $cookie_data 3] + [sec_session_timeout]}] - if {![string is integer $session_expr] || $session_expr < [ns_time]} { + if {![string is integer -strict $session_expr] || $session_expr < [ns_time]} { sec_login_handler } set session_id [lindex $cookie_data 0]