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.46 -r1.79.2.47
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	30 Mar 2021 11:16:55 -0000	1.79.2.46
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	13 Apr 2021 16:35:07 -0000	1.79.2.47
@@ -930,7 +930,8 @@
     # environment. Otherwise, report and return.
     #
     if {![info exists ::aa_run_quietly_p]} {
-            ns_log warning "aa_log_result: called outside the testing environment. Test result: $test_result Test notes: $test_notes"
+        ns_log warning "aa_log_result: called outside the testing environment." \
+            "Test result: $test_result Test notes: $test_notes"
             return
     }
     #
@@ -2042,6 +2043,16 @@
     } {
         Remove a test user.
     } {
+        #
+        # Delete modifying user info, since otherwise we cannot delete
+        # the user_id. The modifying user is e.g. propagated to parent
+        # objss when modifying a page in the content reposistory.
+        #
+        db_dml unset_modifying_user {
+            UPDATE acs_objects
+            SET modifying_user = NULL
+            where modifying_user = :user_id
+        }
         acs_user::delete \
             -user_id $user_id \
             -permanent