Index: openacs-4/packages/acs-tcl/tcl/test/test-set-cookie-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/test-set-cookie-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-tcl/tcl/test/test-set-cookie-procs.tcl	7 Aug 2017 23:48:00 -0000	1.3
+++ openacs-4/packages/acs-tcl/tcl/test/test-set-cookie-procs.tcl	22 Jul 2018 09:58:43 -0000	1.4
@@ -34,7 +34,7 @@
 	    #Get the cookie and we try if exist
 	    #-------------------------------------------------------------------------
 	    set cookie_info_p [ad_get_cookie -include_set_cookies t test_cookie_test_case "" ]
-	    aa_true "Check if the cookie exist" [string equal $cookie_info_p $data]
+	    aa_equals "Check if the cookie exist"  $cookie_info_p $data
 
 	    #-------------------------------------------------------------------------
 	    #clearing the cookie