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.40.2.3 -r1.40.2.4 --- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 5 Sep 2015 14:52:37 -0000 1.40.2.3 +++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 2 Jan 2016 14:01:59 -0000 1.40.2.4 @@ -933,11 +933,7 @@ ns_log Bug "aa_log_final: FAILED: $aa_testcase_id, $test_fails tests failed" } - db_dml testcase_result_insert { - insert into aa_test_final_results - (testcase_id, package_key, timestamp, passes, fails) - values (:aa_testcase_id, :aa_package_key, sysdate, :test_passes, :test_fails) - } + db_dml testcase_result_insert {} } ad_proc -public aa_run_with_teardown { @@ -1251,9 +1247,9 @@ Procedure for geting the url of a mounted package with the package_key. It uses the first instance that it founds. This is usefull for tclwebtest tests. } { - if {![db_0or1row first_url { *SQL* }]} { + if {![db_0or1row first_url {}]} { site_node::instantiate_and_mount -package_key $package_key - db_1row first_url {*SQL*} + db_1row first_url {} } return $url