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.15 -r1.16.2.16
--- openacs-4/packages/acs-automated-testing/www/admin/index.tcl	31 Mar 2021 13:22:28 -0000	1.16.2.15
+++ openacs-4/packages/acs-automated-testing/www/admin/index.tcl	2 May 2021 13:12:11 -0000	1.16.2.16
@@ -160,7 +160,7 @@
         # - The category is blank or it matches the specified.
         #
         if {$by_package_key in [list "" $package_key]
-            && $by_category in [list "" $categories]
+            && $by_category in [list "" {*}$categories]
         } {
             # Swap the highlight flag between packages.
             if {$old_package_key ne $package_key} {
@@ -193,9 +193,9 @@
 foreach category [nsv_get aa_test categories] {
     # joel@aufrecht.org: putting in special cases for exclusionary categories
     if { $category in [nsv_get aa_test exclusion_categories] } {
-        template::multirow append main_categories $category
+        template::multirow append exclusion_categories $category        
     } else {
-        template::multirow append exclusion_categories $category
+        template::multirow append main_categories $category
     }
 }