Index: openacs-4/packages/acs-automated-testing/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/index.tcl,v diff -u -r1.16.2.5 -r1.16.2.6 --- openacs-4/packages/acs-automated-testing/www/admin/index.tcl 2 Sep 2019 13:13:10 -0000 1.16.2.5 +++ openacs-4/packages/acs-automated-testing/www/admin/index.tcl 5 Sep 2019 13:35:13 -0000 1.16.2.6 @@ -34,13 +34,6 @@ append title ", all categories" } -# Calculate package proc test coverage -if { $view_by eq "package" } { - set global_test_coverage [aa::coverage::proc_coverage] - set global_test_coverage_percent [dict get $global_test_coverage coverage] - set global_test_coverage_level [aa::coverage::proc_coverage_level $global_test_coverage_percent] -} - foreach testcase [nsv_get aa_test cases] { lassign $testcase testcase_id testcase_desc . package_key categories @@ -98,6 +91,12 @@ if {$view_by eq "package"} { # + # Calculate package proc test coverage + # + set global_test_coverage [aa::coverage::proc_coverage] + set global_test_coverage_percent [dict get $global_test_coverage coverage] + set global_test_coverage_level [aa::coverage::proc_coverage_level $global_test_coverage_percent] + # # Prepare the template data for a view_by "package" # template::multirow create packageinfo key total passes fails warnings proc_coverage proc_coverage_level