Index: openacs-4/packages/calendar/tcl/test/cal-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/test/cal-item-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/calendar/tcl/test/cal-item-procs.tcl	30 Apr 2018 13:54:38 -0000	1.6
+++ openacs-4/packages/calendar/tcl/test/cal-item-procs.tcl	22 Jul 2018 10:08:01 -0000	1.7
@@ -28,8 +28,8 @@
 
             calendar::item::get \
                 -cal_item_id $cal_item_id -array cal_item
-            aa_true "Name is correct" [string equal $ci_name $cal_item(name)]
-            aa_true "Description is correct" [string equal $ci_description $cal_item(description)]
+            aa_equals "Name is correct"  $ci_name $cal_item(name)
+            aa_equals "Description is correct"  $ci_description $cal_item(description)
             # edit the time of the event
             set recurrence_id \
                 [calendar::item::add_recurrence \