Index: openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/Attic/xowiki-test-procs.tcl,v
diff -u -r1.1.2.36 -r1.1.2.37
--- openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl	8 Dec 2020 15:58:49 -0000	1.1.2.36
+++ openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl	6 Feb 2021 20:43:14 -0000	1.1.2.37
@@ -136,6 +136,9 @@
             # Create the test folder
             ::xowiki::test::require_folder $testfolder $root_folder_id $package_id
 
+            set testfolder_id [::$package_id lookup -parent_id $root_folder_id -name $testfolder]
+            aa_true "can resolve '$testfolder'" {$testfolder_id > 0}
+            
             #
             # Force the system locale to en_US. The value is
             # automatically reset to the previous value, since we are
@@ -167,7 +170,6 @@
             set f1_p1_pl [::$f1_p1_id pretty_link]
             aa_equals "Pretty link of f1/page $f1_p1_pl" $f1_p1_pl "/xowiki-test/f1/p1"
 
-            set testfolder_id [::$package_id lookup -parent_id $root_folder_id -name $testfolder]
             ::xo::db::CrClass get_instance_from_db -item_id $testfolder_id
             set testfolder_pl [::$testfolder_id pretty_link]
             aa_equals "Pretty link of $testfolder $testfolder_pl" $testfolder_pl "$instance/$testfolder"