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.126.2.10 -r1.126.2.11 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 25 Mar 2019 18:38:49 -0000 1.126.2.10 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 24 Apr 2019 16:29:23 -0000 1.126.2.11 @@ -1361,7 +1361,7 @@ } { set cookie_value [ad_get_cookie -include_set_cookies $include_set_cookies $name] - if { $cookie_value eq "" } { + if { $cookie_value eq "" || ![string is list $cookie_value]} { throw {AD_EXCEPTION NO_COOKIE} {Cookie does not exist} } @@ -1392,7 +1392,7 @@ } { set cookie_value [ad_get_cookie -include_set_cookies $include_set_cookies $name] - if { $cookie_value eq "" } { + if { $cookie_value eq "" || ![string is list $cookie_value]} { throw {AD_EXCEPTION NO_COOKIE} {Cookie does not exist} }