Index: openacs-4/packages/acs-subsite/www/shared/session-update.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/session-update.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/acs-subsite/www/shared/session-update.tcl 10 Sep 2002 22:22:13 -0000 1.2 +++ openacs-4/packages/acs-subsite/www/shared/session-update.tcl 10 Jan 2007 21:22:10 -0000 1.3 @@ -25,7 +25,7 @@ return_url } -validate { referrer_error { - if { ![string equal $session_property(referrer) [get_referrer]] } { + if { $session_property(referrer) ne [get_referrer] } { ad_complain "Expected referrer does not match actual referrer" } }