Index: openacs-4/packages/acs-tcl/tcl/test/widget-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/Attic/widget-test-procs.tcl,v
diff -u -N -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/acs-tcl/tcl/test/widget-test-procs.tcl	26 Jun 2019 16:15:20 -0000	1.1.2.2
+++ openacs-4/packages/acs-tcl/tcl/test/widget-test-procs.tcl	3 Sep 2019 06:35:55 -0000	1.1.2.3
@@ -16,14 +16,10 @@
 
         @author Hanifa Hasan
 } {
-    aa_run_with_teardown \
-        -rollback \
-        -test_code {
-            set colors { 0,0,0 #000000 255,255,255 #ffffff 218,18,26 #da121a 252,221,9 #fcdd09 99,11,87 #630b57 }
-            dict for { color hex } $colors {
-                aa_equals "ad_color_to_hex $color return $hex " "$hex" "[ad_color_to_hex $color]"
-            }
-        }
+    set colors { 0,0,0 #000000 255,255,255 #ffffff 218,18,26 #da121a 252,221,9 #fcdd09 99,11,87 #630b57 }
+    dict for { color hex } $colors {
+        aa_equals "ad_color_to_hex $color return $hex " "$hex" "[ad_color_to_hex $color]"
+    }
 }
 
 # Local variables: