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 -r1.20 -r1.20.2.1 --- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 1 Nov 2003 08:45:36 -0000 1.20 +++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 9 Dec 2003 12:26:45 -0000 1.20.2.1 @@ -781,11 +781,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 } {