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.79.2.39 -r1.79.2.40 --- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 14 Feb 2021 21:05:52 -0000 1.79.2.39 +++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl 17 Feb 2021 08:25:36 -0000 1.79.2.40 @@ -663,7 +663,9 @@ # Run each testcase # foreach testcase_id $testcase_ids { + ns_log notice "========================================= start $testcase_id" aa_run_testcase $testcase_id + ns_log notice "========================================= end $testcase_id" } # @@ -862,9 +864,7 @@ aa_log_result "sect" $log_notes } -ad_proc -public aa_log { - log_notes -} { +ad_proc -public aa_log { args } { Writes a log message to the testcase log. Call this function within a testcase, stub or component. @@ -873,7 +873,7 @@ } { #global aa_testcase_id #global aa_package_key - + set log_notes [join $args " "] # # When aa_run_quietly_p exists, we run inside the testing # environment.