Index: openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/Attic/xowiki-admin-tests-procs.tcl,v
diff -u -r1.1.2.23 -r1.1.2.24
--- openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl	21 Apr 2022 11:34:16 -0000	1.1.2.23
+++ openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl	12 Aug 2022 17:17:33 -0000	1.1.2.24
@@ -124,6 +124,15 @@
 
       @author Gustaf Neumann
     } {
+        #
+        # Later on in the test we will loop through ::xowiki::Page
+        # instances to perform some checks. Make sure we do not have
+        # leftover pollution from previous tests.
+        #
+        foreach p [::xowiki::Page info instances] {
+           $p destroy
+        }
+
         Object test
         test set passed 0
         test set failed 0