Index: openacs-4/packages/acs-automated-testing/www/admin/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/index.adp,v diff -u -r1.21.2.19 -r1.21.2.20 --- openacs-4/packages/acs-automated-testing/www/admin/index.adp 2 May 2021 19:08:32 -0000 1.21.2.19 +++ openacs-4/packages/acs-automated-testing/www/admin/index.adp 20 Apr 2022 10:02:21 -0000 1.21.2.20 @@ -251,7 +251,7 @@ - @tests.package_key@ + @tests.package_key@ @tests.id@ @tests.categories@ @tests.description@ @@ -260,6 +260,7 @@ - - - + - 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.18 -r1.16.2.19 --- openacs-4/packages/acs-automated-testing/www/admin/index.tcl 2 May 2021 19:08:32 -0000 1.16.2.18 +++ openacs-4/packages/acs-automated-testing/www/admin/index.tcl 20 Apr 2022 10:02:21 -0000 1.16.2.19 @@ -161,7 +161,16 @@ lassign $results($testcase_id,$package_key) testcase_desc . categories \ testcase_timestamp testcase_passes testcase_fails testcase_warnings - regexp {^(.+?\.)\s} $testcase_desc "" testcase_desc + set orig $testcase_desc + set testcase_desc [string trim $testcase_desc] + # + # Get the first paragraph of the description. + # + set p [string first \n\n $testcase_desc] + if {$p > -1} { + set testcase_desc [string range $testcase_desc 0 $p] + } + set categories_str [join $categories ", "] # # Only add the testcase to the template multirow if either