Index: openacs-4/packages/acs-admin/www/test/signed-cookies-test-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/test/signed-cookies-test-2.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/acs-admin/www/test/signed-cookies-test-2.tcl	13 Mar 2001 22:59:26 -0000	1.1
+++ openacs-4/packages/acs-admin/www/test/signed-cookies-test-2.tcl	10 Jan 2007 21:22:00 -0000	1.2
@@ -98,7 +98,7 @@
     where token_id = :token_id
 }]
 
-if { [string compare $token_value $token_value_db] == 0 } {
+if { $token_value eq $token_value_db  } {
     ns_write "<li>Success: sec_get_token test 1 passed."
 } else {
     ns_write "<li>Failure: sec_get_token test 1 failed."
@@ -107,7 +107,7 @@
 # do the same thing again to test the caching of tcl_
 set token_value [sec_get_token $token_id]
 
-if { [string compare $token_value $token_value_db] == 0 } {
+if { $token_value eq $token_value_db  } {
     ns_write "<li>Success: sec_get_token test 2
     passed."
 } else {