Index: openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl,v diff -u -N -r1.22 -r1.23 --- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 8 Dec 2003 06:57:14 -0000 1.22 +++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 11 Dec 2003 21:39:46 -0000 1.23 @@ -787,11 +787,13 @@ teardown_code will be executed even if error is thrown. Will catch errors in teardown_code as well and provide stack traces for both code blocks. - @param test_code Tcl code that sets up the test case and executes tests + @param test_code Tcl code that sets up the test case and executes tests + @param teardown_code Tcl code that tears down database data etc. that needs to execute - after testing even if error is thrown. - @param rollback If specified, any db transactions in test_code will be rolled back. + after testing even if error is thrown. + @param rollback If specified, any db transactions in test_code will be rolled back. + @author Peter Marklund } { if { $rollback_p } {