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.55 -r1.79.2.56
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	28 Jan 2022 17:19:35 -0000	1.79.2.55
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	20 Feb 2022 13:09:10 -0000	1.79.2.56
@@ -689,7 +689,7 @@
     try to make it easier to read nested test cases.
 } {
     if {[info exists ::__aa_test_indent]} {
-        return "<tt>[string repeat {<div class='vl'></div>} [expr {[info level] - $::__aa_test_indent -2}]]</tt>"
+        return "<tt>[string repeat {<span class='vl'></span>} [expr {[info level] - $::__aa_test_indent -2}]]</tt>"
     }
 }
 
@@ -1195,6 +1195,7 @@
     } {
         if {$form_content eq ""} {
             set form_content [form_get_fields $form]
+            aa_log "FORM-CONTENT from FORM '$form_content'"
         }
         if {$form_content eq ""} {
             error "either nonempty form or form_content has to be provided"
Index: openacs-4/packages/acs-automated-testing/www/admin/testcase.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/testcase.adp,v
diff -u -r1.25.2.6 -r1.25.2.7
--- openacs-4/packages/acs-automated-testing/www/admin/testcase.adp	28 Feb 2021 16:42:10 -0000	1.25.2.6
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase.adp	20 Feb 2022 13:09:10 -0000	1.25.2.7
@@ -12,8 +12,12 @@
           @bug_blurb;noquote@</dd>
       </if>
       <if @proc_blurb@ not nil>
-        <dt class="description-list">Procs:</dt><dd>This test case covers OpenACS proc(s):
-          @proc_blurb;noquote@</dd>
+        <dt class="description-list">Procs:</dt>
+            <dd>This test case covers directly the following OpenACS proc(s):<br>
+             @proc_blurb;noquote@</dd>
+             <if @nr_indirect_test_procs@ gt 0>
+            <dd>This test case covers indirectly further @nr_indirect_test_procs@ OpenACS procs.
+             </if>
       </if>
       <if @url_blurb@ not nil>
         <dt class="description-list">URLs:</dt><dd>This test case covers the following URLs:
Index: openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl,v
diff -u -r1.22.2.6 -r1.22.2.7
--- openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	28 Feb 2021 16:42:10 -0000	1.22.2.6
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	20 Feb 2022 13:09:10 -0000	1.22.2.7
@@ -87,12 +87,29 @@
 }
 set bug_blurb [join $bug_list ", "]
 
+#
+# Split procs into direct and indirectly covered procs. These are
+# separated by an empty line. if there is no empty line, then we
+# assume all procs are directly tested.
+#
+set direct_testcase_procs ""
+set indirect_testcase_procs ""
+set var direct_testcase_procs
+foreach line [split [string trim $testcase_procs] \n] {
+    if {[string trim $line] eq ""} {
+        set var indirect_testcase_procs 
+    } else {
+        append $var $line " "
+    }
+}
+
 set proc_list [list]
-foreach p $testcase_procs {
+foreach p $direct_testcase_procs {
     set href [export_vars -base "/api-doc/proc-view" { {proc $p} }]
     lappend proc_list [subst {<a href="[ns_quotehtml $href]">$p</a>}]
 }
 set proc_blurb [join $proc_list ", "]
+set nr_indirect_test_procs [llength $indirect_testcase_procs]
 
 set url_list [list]
 foreach url $testcase_urls {
Index: openacs-4/packages/acs-automated-testing/www/resources/tests.css
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/resources/Attic/tests.css,v
diff -u -r1.1.2.9 -r1.1.2.10
--- openacs-4/packages/acs-automated-testing/www/resources/tests.css	13 Mar 2021 11:25:34 -0000	1.1.2.9
+++ openacs-4/packages/acs-automated-testing/www/resources/tests.css	20 Feb 2022 13:09:10 -0000	1.1.2.10
@@ -140,7 +140,7 @@
     padding: 2px;
     background-color: inherit;
 }
-div.vl {
+div.vl, span.vl {
     border-left: 1px solid #aaa;
     padding:4px;
     height:3ex;