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.79.2.57 -r1.79.2.58
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	2 Mar 2022 13:18:42 -0000	1.79.2.57
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	9 Apr 2022 15:20:46 -0000	1.79.2.58
@@ -1530,6 +1530,7 @@
 
         set d [::acs::test::form_reply -user_id 0 -form $form]
         acs::test::reply_has_status_code $d 302
+        set ::__aa_testing_mode 1
 
         return $d
     }
@@ -1543,6 +1544,8 @@
     } {
         set d [acs::test::http -last_request $last_request /register/logout]
         acs::test::reply_has_status_code $d 302
+        unset -nocomplain ::__aa_testing_mode 1
+
         return $d
     }
 
@@ -1603,7 +1606,11 @@
     ad_proc -public ::acs::test::dom_html {var html body} {
     } {
         upvar $var root
-        dom parse -html $html doc
+        try {
+            dom parse -html $html doc
+        } on error {errorMsg} {
+            ns_log error "Failed to parse the following HTML text with message: $errorMsg\n$html"
+        }
         $doc documentElement root
         uplevel 1 $body
     }