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.63 -r1.79.2.64
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	9 Sep 2022 13:13:53 -0000	1.79.2.63
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	9 Sep 2022 14:45:35 -0000	1.79.2.64
@@ -139,6 +139,9 @@
 ad_proc -public aa_unstub {
     proc_name
 } {
+    Copies (back) a proc with "_unstubbed" suffix to its supposedly
+    unpostfixed original name.
+
     @author Peter Harper
     @creation-date 24 July 2001
 } {
@@ -889,6 +892,8 @@
     test_result
     args
 } {
+    Log a test result
+
     @author Peter Harper
     @creation-date 24 July 2001
 } {
@@ -1652,6 +1657,14 @@
     }
 
     ad_proc -public ::acs::test::dom_html {var html body} {
+        Parses HTML into a tDOM object and executes some code.
+
+        @param var the variable name that body can refer to as
+                   documentElement of the document (e.g. "root").
+        @param html the markup to be parsed.
+        @param body a tcl script executed in the caller scope that can
+                    assume the document to be pased and be available
+                    in "var".
     } {
         upvar $var root
         try {