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 -N -r1.68 -r1.69
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	24 Jul 2018 12:37:07 -0000	1.68
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	24 Jul 2018 14:36:27 -0000	1.69
@@ -457,7 +457,8 @@
 
     set test_case_list [list $testcase_id $testcase_desc \
                             [info script] $package_key \
-                            $cats $init_classes $on_error $args $error_level $bugs $procs]
+                            $cats $init_classes $on_error $args $error_level \
+                            $bugs $procs $urls]
     foreach p $procs {
         api_add_to_proc_doc -proc_name $p -property testcase -value [list $testcase_id $package_key]
         #ns_log notice "TESTCASE: api_add_to_proc_doc -proc_name $p -property testcase -value $testcase_id -> [dict get [nsv_get api_proc_doc $p] testcase]"
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 -N -r1.22 -r1.23
--- openacs-4/packages/acs-automated-testing/www/admin/testcase.adp	19 Jul 2018 09:59:34 -0000	1.22
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase.adp	24 Jul 2018 14:36:27 -0000	1.23
@@ -15,6 +15,10 @@
         <dt>Procs:</dt><dd>This test case covers OpenACS proc(s):
           @proc_blurb;noquote@</dd>
       </if>
+      <if @url_blurb@ not nil>  
+        <dt>URLs:</dt><dd>This test case covers the following URLs:
+          @url_blurb;noquote@</dd>
+      </if>
       <if @testcase_inits@ ne "">
         <dt>Initialisation Classes:</dt><dd>@testcase_inits@</dd>
       </if>
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 -N -r1.19 -r1.20
--- openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	19 Jul 2018 13:30:11 -0000	1.19
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	24 Jul 2018 14:36:27 -0000	1.20
@@ -58,9 +58,11 @@
     } {
         lassign $testcase . testcase_desc testcase_file . \
             testcase_cats testcase_inits \
-            testcase_on_error testcase_bodys testcase_error_level testcase_bugs testcase_procs
-        set testcase_cats  [join $testcase_cats ", "]
-        set testcase_inits [join $testcase_inits ", "]
+            testcase_on_error testcase_bodys testcase_error_level \
+            testcase_bugs testcase_procs testcase_urls
+        ns_log notice "testcase_urls $testcase_urls"
+        set testcase_cats  [join [lsort $testcase_cats] ", "]
+        set testcase_inits [join [lsort $testcase_inits] ", "]
         break
     }
 }
@@ -79,7 +81,16 @@
 }
 set proc_blurb [join $proc_list ", "]
 
+set url_list [list]
+foreach url $testcase_urls {
+    #http://localhost:8100/api-doc/content-page-view?version_id=13092&path=packages/forums/www/admin/forum-edit.adp
+    set path packages/$package_key/www/$url.tcl
+    set href [export_vars -base "/api-doc/content-page-view" { path {source_p 1} }]
+    lappend url_list [subst {<a href="[ns_quotehtml $href]">$url</a>}]
+}
+set url_blurb [join $url_list ", "]
 
+
 template::multirow create bodys body_number body
 if {[llength $testcase_bodys] == 0} {
     set testcase_desc ""