Index: openacs-4/packages/acs-automated-testing/tcl/coverage-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/Attic/coverage-procs.tcl,v
diff -u -N -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/acs-automated-testing/tcl/coverage-procs.tcl	29 Aug 2019 18:34:39 -0000	1.1.2.2
+++ openacs-4/packages/acs-automated-testing/tcl/coverage-procs.tcl	30 Aug 2019 10:08:14 -0000	1.1.2.3
@@ -160,7 +160,7 @@
     } elseif { $coverage == 100 } {
         return full
     } else {
-        return "Error: Invalid percentage"
+        return -code error "Error: Invalid coverage percentage"
     }
 }